Fix bugs in equipment allocation using hotkeys

The behaviour is still not perfect, should be able to cycle through all
options by pressing one key. There is unnecessary memory of past state
going on here

src/Dodge/Data/Button.hs

@@ -60,7 +60,7 @@ data Button = Button
     --deriving (Eq, Show, Read) --, Generic)
     --h--deriving (Eq, Show, Read) --Generic, Flat)
 
-data ButtonState = BtOn | BtOff | BtNoLabel
+data ButtonState = BtOn | BtOff | BtInactive
     deriving Eq -- (Eq, Ord, Show, Read) --Generic, Flat)
 
 makeLenses ''Button