From: Juanma Barranquero <lekktu@gmail.com>
Date: Wed, 26 Sep 2007 00:27:18 +0000 (+0000)
Subject: (sh-make-vars-local, sh-reset-indent-vars-to-global-values):
X-Git-Tag: emacs-pretest-23.0.90~10621
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f24a26a546ef63954fae272f781ada8af459de8a;p=emacs.git

(sh-make-vars-local, sh-reset-indent-vars-to-global-values):
Use `mapc' rather than `mapcar'.
---

diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el
index c3adbbe8516..5314bb3b745 100644
--- a/lisp/progmodes/sh-script.el
+++ b/lisp/progmodes/sh-script.el
@@ -1029,7 +1029,7 @@ subshells can nest."
           (t (error "Internal error in sh-font-lock-quoted-subshell")))
         (forward-char 1)))
     t))
-            
+
 
 (defun sh-is-quoted-p (pos)
   (and (eq (char-before pos) ?\\)
@@ -1906,14 +1906,14 @@ variable `sh-make-vars-local' has been set to nil.
 To revert all these variables to the global values, use
 command `sh-reset-indent-vars-to-global-values'."
   (interactive)
-  (mapcar 'make-local-variable sh-var-list)
+  (mapc 'make-local-variable sh-var-list)
   (message "Indentation variables are now local."))
 
 (defun sh-reset-indent-vars-to-global-values ()
   "Reset local indentation variables to the global values.
 Then, if variable `sh-make-vars-local' is non-nil, make them local."
   (interactive)
-  (mapcar 'kill-local-variable sh-var-list)
+  (mapc 'kill-local-variable sh-var-list)
   (if sh-make-vars-local
       (mapcar 'make-local-variable sh-var-list)))