[dpapavas] Improvements for Emacs Gtk binding theme. Fixes #7254
This commit is contained in:
parent
e5d809af50
commit
0da0536010
|
@ -350,8 +350,10 @@ class MessageWindow(object):
|
||||||
# CTRL mask
|
# CTRL mask
|
||||||
if modifier & gtk.gdk.CONTROL_MASK:
|
if modifier & gtk.gdk.CONTROL_MASK:
|
||||||
if keyval == gtk.keysyms.h: # CTRL + h
|
if keyval == gtk.keysyms.h: # CTRL + h
|
||||||
control._on_history_menuitem_activate()
|
if gtk.settings_get_default().get_property(
|
||||||
return True
|
'gtk-key-theme-name') != 'Emacs':
|
||||||
|
control._on_history_menuitem_activate()
|
||||||
|
return True
|
||||||
elif control.type_id == message_control.TYPE_CHAT and \
|
elif control.type_id == message_control.TYPE_CHAT and \
|
||||||
keyval == gtk.keysyms.f: # CTRL + f
|
keyval == gtk.keysyms.f: # CTRL + f
|
||||||
# CTRL + f moves cursor one char forward when user uses Emacs
|
# CTRL + f moves cursor one char forward when user uses Emacs
|
||||||
|
@ -431,8 +433,10 @@ class MessageWindow(object):
|
||||||
control.show_emoticons_menu()
|
control.show_emoticons_menu()
|
||||||
return True
|
return True
|
||||||
elif keyval == gtk.keysyms.d: # ALT + D show actions menu
|
elif keyval == gtk.keysyms.d: # ALT + D show actions menu
|
||||||
control.on_actions_button_clicked(control.actions_button)
|
if gtk.settings_get_default().get_property(
|
||||||
return True
|
'gtk-key-theme-name') != 'Emacs':
|
||||||
|
control.on_actions_button_clicked(control.actions_button)
|
||||||
|
return True
|
||||||
elif control.type_id == message_control.TYPE_GC and \
|
elif control.type_id == message_control.TYPE_GC and \
|
||||||
keyval == gtk.keysyms.t: # ALT + t
|
keyval == gtk.keysyms.t: # ALT + t
|
||||||
control._on_change_subject_menuitem_activate(None)
|
control._on_change_subject_menuitem_activate(None)
|
||||||
|
|
Loading…
Reference in New Issue