From 0404a075c0535bbd9313a2ccc562696691e8540d Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 9 Sep 2005 01:26:00 +0000 Subject: [PATCH] (sh-skeleton-pair-default-alist): New var. (sh-mode): Locally set skeleton-pair-default-alist. --- lisp/progmodes/sh-script.el | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el index 4f702186685..e37390f5b80 100644 --- a/lisp/progmodes/sh-script.el +++ b/lisp/progmodes/sh-script.el @@ -490,7 +490,10 @@ This is buffer-local in every such buffer.") map) "Keymap used in Shell-Script mode.") - +(defvar sh-skeleton-pair-default-alist '((?( _ ?)) (?\)) + (?[ ?\s _ ?\s ?]) (?\]) + (?{ _ ?}) (?\})) + "Value to use for `skeleton-pair-default-alist' in Shell-Script mode.") (defcustom sh-dynamic-complete-functions '(shell-dynamic-complete-environment-variable @@ -1362,6 +1365,8 @@ with your script for an edit-interpret-debug cycle." (make-local-variable 'sh-shell-variables-initialized) (make-local-variable 'imenu-generic-expression) (make-local-variable 'sh-indent-supported-here) + (make-local-variable 'skeleton-pair-default-alist) + (setq skeleton-pair-default-alist sh-skeleton-pair-default-alist) (setq skeleton-end-hook (lambda () (or (eolp) (newline) (indent-relative))) paragraph-start (concat page-delimiter "\\|$") -- 2.11.4.GIT