Mercurial > emacs
comparison lisp/progmodes/sh-script.el @ 86283:dcb8172071f2
(sh-mode): Set defun-prompt-regexp.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Wed, 21 Nov 2007 20:23:26 +0000 |
parents | 35543641f89c |
children | 5459c18c7d1a 53108e6cea98 |
comparison
equal
deleted
inserted
replaced
86282:6fd01916efe1 | 86283:dcb8172071f2 |
---|---|
1522 skeleton-further-elements '((< '(- (min sh-indentation | 1522 skeleton-further-elements '((< '(- (min sh-indentation |
1523 (current-column))))) | 1523 (current-column))))) |
1524 skeleton-filter-function 'sh-feature | 1524 skeleton-filter-function 'sh-feature |
1525 skeleton-newline-indent-rigidly t | 1525 skeleton-newline-indent-rigidly t |
1526 sh-indent-supported-here nil) | 1526 sh-indent-supported-here nil) |
1527 (set (make-local-variable 'defun-prompt-regexp) | |
1528 (concat "^\\(function[ \t]\\|[[:alnum:]]+[ \t]+()[ \t]+\\)")) | |
1527 (set (make-local-variable 'parse-sexp-ignore-comments) t) | 1529 (set (make-local-variable 'parse-sexp-ignore-comments) t) |
1528 ;; Parse or insert magic number for exec, and set all variables depending | 1530 ;; Parse or insert magic number for exec, and set all variables depending |
1529 ;; on the shell thus determined. | 1531 ;; on the shell thus determined. |
1530 (sh-set-shell | 1532 (sh-set-shell |
1531 (cond ((save-excursion | 1533 (cond ((save-excursion |