From: Eli Zaretskii <eliz@gnu.org>
Date: Mon, 2 Oct 2006 08:51:40 +0000 (+0000)
Subject: (sh-prev-thing): Fix last change.
X-Git-Tag: emacs-pretest-22.0.90~261
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8c86938ff0ade7b636510a3727380bccad7451df;p=emacs.git

(sh-prev-thing): Fix last change.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 256b793c244..f6534c07b6c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2006-10-02  Michael Welsh Duggan  <md5i@cs.cmu.edu>
+
+	* progmodes/sh-script.el (sh-prev-thing): Fix last change.
+
 2006-10-02  MIYOSHI Masanori <miyoshi@meadowy.org>  (tiny change)
 
 	* mail/smtpmail.el (smtpmail-try-auth-methods): Fix typo in
diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el
index 4032c9ce933..089715b4836 100644
--- a/lisp/progmodes/sh-script.el
+++ b/lisp/progmodes/sh-script.el
@@ -2472,8 +2472,8 @@ we go to the end of the previous line and do not check for continuations."
 	(point))
 	(skip-chars-backward " \t;")
 	(unless (looking-at "\\s-*;;")
-	(skip-chars-backward "^)}];\"'`({[")
-	(setq c (char-before))
+	  (skip-chars-backward "^)}];\"'`({[")
+	  (setq c (char-before)))
 	(sh-debug "stopping at %d c is %s  start=%d min-point=%d"
 		  (point) c start min-point)
 	(if (< (point) min-point)
@@ -2508,7 +2508,7 @@ we go to the end of the previous line and do not check for continuations."
 	  ;; c	-- return a string
 	  (char-to-string c)
 	  ))
-	)))))
+	))))
 
 
 (defun sh-this-is-a-continuation ()