Mercurial > emacs

changeset 40927:d8cd2ee4b10c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(sh-must-be-shell-mode): Allow modes derived from sh-mode.
author Richard M. Stallman <rms@gnu.org>
date Sun, 11 Nov 2001 20:07:46 +0000
parents 14c471312660
children ebfea94f75d4
files lisp/progmodes/sh-script.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/sh-script.el	Sun Nov 11 20:06:58 2001 +0000
+++ b/lisp/progmodes/sh-script.el	Sun Nov 11 20:07:46 2001 +0000
@@ -1662,7 +1662,7 @@
 ;; Indentation stuff.
 (defun sh-must-be-shell-mode ()
   "Signal an error if not in Shell-script mode."
-  (unless (eq major-mode 'sh-mode)
+  (unless (derived-mode-p 'sh-mode)
     (error "This buffer is not in Shell-script mode")))
 
 (defun sh-must-support-indent ()
@@ -1670,7 +1670,7 @@
 Also, the buffer must be in Shell-script mode."
   (sh-must-be-shell-mode)
   (unless sh-indent-supported-here
-    (error "This buffer's shell type is not supported for this command")))
+    (error "This buffer's shell does not support indentation through Emacs")))
 
 (defun sh-make-vars-local ()
   "Make the indentation variables local to this buffer.