Permalink
Browse files

fix a bug where gold can't be dropped under GTK (other frontends are OK)

  • Loading branch information...
1 parent 1e2783c commit 0340098f67338828145374f0b3cb9fa6ede5303d @Mikolaj Mikolaj committed Feb 6, 2011
Showing with 1 addition and 1 deletion.
  1. +0 −1 src/Action.hs
  2. +1 −0 src/Display/Gtk.hs
View
@@ -195,4 +195,3 @@ withPerception h = Action (\ s e _ k a st ms ->
-- | Get the current perception.
currentPerception :: Action Perception
currentPerception = Action (\ s e p k a st ms -> k st ms p)
-
View
@@ -160,6 +160,7 @@ keyTranslate "comma" = Just (K.Char ',')
keyTranslate "space" = Just (K.Char ' ')
keyTranslate "question" = Just (K.Char '?')
keyTranslate "asterisk" = Just (K.Char '*')
+keyTranslate "dollar" = Just (K.Char '$')
keyTranslate "Escape" = Just K.Esc
keyTranslate "Return" = Just K.Return
keyTranslate "Tab" = Just K.Tab

0 comments on commit 0340098

Please sign in to comment.