aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/facemenu.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/facemenu.el b/lisp/facemenu.el
index b7307b6e3e3..7cbc338bad7 100644
--- a/lisp/facemenu.el
+++ b/lisp/facemenu.el
@@ -160,11 +160,11 @@ when they are created.")
160 160
161(defvar facemenu-justification-menu 161(defvar facemenu-justification-menu
162 (let ((map (make-sparse-keymap "Justification"))) 162 (let ((map (make-sparse-keymap "Justification")))
163 (define-key map [?c] (cons "Center" 'set-justification-center)) 163 (define-key map "c" (cons "Center" 'set-justification-center))
164 (define-key map [?b] (cons "Full" 'set-justification-full)) 164 (define-key map "f" (cons "Full" 'set-justification-full))
165 (define-key map [?r] (cons "Right" 'set-justification-right)) 165 (define-key map "r" (cons "Right" 'set-justification-right))
166 (define-key map [?l] (cons "Left" 'set-justification-left)) 166 (define-key map "l" (cons "Left" 'set-justification-left))
167 (define-key map [?u] (cons "Unfilled" 'set-nofill)) 167 (define-key map "n" (cons "Unfilled" 'set-justification-none))
168 map) 168 map)
169 "Submenu for text justification commands.") 169 "Submenu for text justification commands.")
170(defalias 'facemenu-justification-menu facemenu-justification-menu) 170(defalias 'facemenu-justification-menu facemenu-justification-menu)