diff options
Diffstat (limited to 'lisp/cedet/semantic/decorate')
| -rw-r--r-- | lisp/cedet/semantic/decorate/include.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/cedet/semantic/decorate/include.el b/lisp/cedet/semantic/decorate/include.el index 2834b902c21..788973ac6fa 100644 --- a/lisp/cedet/semantic/decorate/include.el +++ b/lisp/cedet/semantic/decorate/include.el @@ -42,8 +42,8 @@ ;;; Code: ;;; FACES AND KEYMAPS -(defvar semantic-decoratiton-mouse-3 (if (featurep 'xemacs) [ button3 ] [ mouse-3 ]) - "The keybinding lisp object to use for binding the right mouse button.") +(defvar semantic-decoration-mouse-3 (if (featurep 'xemacs) [ button3 ] [ mouse-3 ]) + "The keybinding Lisp object to use for binding the right mouse button.") ;;; Includes that are in a happy state! ;; @@ -55,7 +55,7 @@ Used by the decoration style: `semantic-decoration-on-includes'." (defvar semantic-decoration-on-include-map (let ((km (make-sparse-keymap))) - (define-key km semantic-decoratiton-mouse-3 'semantic-decoration-include-menu) + (define-key km semantic-decoration-mouse-3 'semantic-decoration-include-menu) km) "Keymap used on includes.") @@ -126,7 +126,7 @@ Used by the decoration style: `semantic-decoration-on-unknown-includes'." (defvar semantic-decoration-on-unknown-include-map (let ((km (make-sparse-keymap))) ;(define-key km [ mouse-2 ] 'semantic-decoration-unknown-include-describe) - (define-key km semantic-decoratiton-mouse-3 'semantic-decoration-unknown-include-menu) + (define-key km semantic-decoration-mouse-3 'semantic-decoration-unknown-include-menu) km) "Keymap used on unparsed includes.") @@ -189,7 +189,7 @@ Used by the decoration style: `semantic-decoration-on-fileless-includes'." (defvar semantic-decoration-on-fileless-include-map (let ((km (make-sparse-keymap))) ;(define-key km [ mouse-2 ] 'semantic-decoration-fileless-include-describe) - (define-key km semantic-decoratiton-mouse-3 'semantic-decoration-fileless-include-menu) + (define-key km semantic-decoration-mouse-3 'semantic-decoration-fileless-include-menu) km) "Keymap used on unparsed includes.") @@ -251,7 +251,7 @@ Used by the decoration style: `semantic-decoration-on-unparsed-includes'." (defvar semantic-decoration-on-unparsed-include-map (let ((km (make-sparse-keymap))) - (define-key km semantic-decoratiton-mouse-3 'semantic-decoration-unparsed-include-menu) + (define-key km semantic-decoration-mouse-3 'semantic-decoration-unparsed-include-menu) km) "Keymap used on unparsed includes.") |