/[emacs]/emacs/lisp/facemenu.el
ViewVC logotype

Diff of /emacs/lisp/facemenu.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.75 by jurta, Wed Jan 12 00:31:50 2005 UTC revision 1.76 by rms, Sun Mar 6 20:44:33 2005 UTC
# Line 39  Line 39 
39  ;; modifications before inserting or typing anything.  ;; modifications before inserting or typing anything.
40  ;;  ;;
41  ;; Faces can be selected from the keyboard as well.  ;; Faces can be selected from the keyboard as well.
42  ;; The standard keybindings are M-g (or ESC g) + letter:  ;; The standard keybindings are M-o (or ESC o) + letter:
43  ;; M-g i = "set italic",  M-g b = "set bold", etc.  ;; M-o i = "set italic",  M-o b = "set bold", etc.
44    
45  ;;; Customization:  ;;; Customization:
46  ;; An alternative set of keybindings that may be easier to type can be set up  ;; An alternative set of keybindings that may be easier to type can be set up
# Line 91  Line 91 
91    (require 'button))    (require 'button))
92    
93  ;;; Provide some binding for startup:  ;;; Provide some binding for startup:
94  ;;;###autoload (define-key global-map "\M-g" 'facemenu-keymap)  ;;;###autoload (define-key global-map "\M-o" 'facemenu-keymap)
95  ;;;###autoload (autoload 'facemenu-keymap "facemenu" "Keymap for face-changing commands." t 'keymap)  ;;;###autoload (autoload 'facemenu-keymap "facemenu" "Keymap for face-changing commands." t 'keymap)
96    
97  ;; Global bindings:  ;; Global bindings:
98  (define-key global-map [C-down-mouse-2] 'facemenu-menu)  (define-key global-map [C-down-mouse-2] 'facemenu-menu)
99  (define-key global-map "\M-g" 'facemenu-keymap)  (define-key global-map "\M-o" 'facemenu-keymap)
100    
101  (defgroup facemenu nil  (defgroup facemenu nil
102    "Create a face menu for interactively adding fonts to text"    "Create a face menu for interactively adding fonts to text"

Legend:
Removed from v.1.75  
changed lines
  Added in v.1.76

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26