diff options
| author | Chong Yidong <cyd@stupidchicken.com> | 2008-09-24 22:51:09 +0000 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2008-09-24 22:51:09 +0000 |
| commit | e4bf03f6a852b7e9056ffea9367e0e932d0379ae (patch) | |
| tree | 46682241b74cd185ece2b6724798b90f552b1ffe /lisp/progmodes/sh-script.el | |
| parent | 32655809a8c9c9a8382996cf553660c33b66c693 (diff) | |
| download | emacs-e4bf03f6a852b7e9056ffea9367e0e932d0379ae.tar.gz emacs-e4bf03f6a852b7e9056ffea9367e0e932d0379ae.tar.bz2 emacs-e4bf03f6a852b7e9056ffea9367e0e932d0379ae.zip | |
(sh-mode-map): Don't assume that skeleton is loaded.
Diffstat (limited to 'lisp/progmodes/sh-script.el')
| -rw-r--r-- | lisp/progmodes/sh-script.el | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el index 5d0f1cbb97f..72533d88734 100644 --- a/lisp/progmodes/sh-script.el +++ b/lisp/progmodes/sh-script.el @@ -495,8 +495,13 @@ This is buffer-local in every such buffer.") :help "Set the indentation for the current line")) (define-key menu-map [sh-pair] - '(menu-item "Insert braces and quotes in pairs" (lambda () (interactive) (setq skeleton-pair (not skeleton-pair))) - :button (:toggle . skeleton-pair) + '(menu-item "Insert braces and quotes in pairs" + (lambda () + (interactive) + (require 'skeleton) + (setq skeleton-pair (not skeleton-pair))) + :button (:toggle . (and (boundp 'skeleton-pair) + skeleton-pair)) :help "Inserting a brace or quote automatically inserts the matching pair")) (define-key menu-map [sh-s0] '("--")) |