mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

(facemenu-justification-menu): binding fixed.

Browse source
This commit is contained in:
Boris Goldowsky 1995-02-23 18:45:30 +00:00
parent 3db1e3b5d6
commit 6c1fd142be
1 changed files with 5 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lisp/facemenu.el
View file

@ -160,11 +160,11 @@ when they are created.")
(defvar facemenu-justification-menu
(let ((map (make-sparse-keymap "Justification")))
(define-key map [?c] (cons "Center" 'set-justification-center))
(define-key map [?b] (cons "Full" 'set-justification-full))
(define-key map [?r] (cons "Right" 'set-justification-right))
(define-key map [?l] (cons "Left" 'set-justification-left))
(define-key map [?u] (cons "Unfilled" 'set-nofill))
(define-key map "c" (cons "Center" 'set-justification-center))
(define-key map "f" (cons "Full" 'set-justification-full))
(define-key map "r" (cons "Right" 'set-justification-right))
(define-key map "l" (cons "Left" 'set-justification-left))
(define-key map "n" (cons "Unfilled" 'set-justification-none))
map)
"Submenu for text justification commands.")
(defalias 'facemenu-justification-menu facemenu-justification-menu)