[Emacs-diffs] emacs/lisp ChangeLog progmodes/sh-script.el

[Chong Yidong]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Chong Yidong <cyd>      09/11/01 17:44:10

Modified files:
        lisp           : ChangeLog 
        lisp/progmodes : sh-script.el 

Log message:
        * progmodes/sh-script.el (sh-font-lock-paren): Fix last change.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.16540&r2=1.16541
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/progmodes/sh-script.el?cvsroot=emacs&r1=1.229&r2=1.230

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.16540
retrieving revision 1.16541
diff -u -b -r1.16540 -r1.16541
--- ChangeLog   1 Nov 2009 09:47:58 -0000       1.16540
+++ ChangeLog   1 Nov 2009 17:44:04 -0000       1.16541
@@ -1,3 +1,7 @@
+2009-11-01  Chong Yidong  <address@hidden>
+
+       * progmodes/sh-script.el (sh-font-lock-paren): Fix last change.
+
 2009-11-01  Andreas Schwab  <address@hidden>
 
        * view.el (view-mode-exit): If OLD-BUF is dead bury the buffer

Index: progmodes/sh-script.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/progmodes/sh-script.el,v
retrieving revision 1.229
retrieving revision 1.230
diff -u -b -r1.229 -r1.230
--- progmodes/sh-script.el      31 Oct 2009 02:38:41 -0000      1.229
+++ progmodes/sh-script.el      1 Nov 2009 17:44:09 -0000       1.230
@@ -1110,7 +1110,7 @@
                    (condition-case nil (progn (backward-sexp 1) t)
                      (error nil)))))
          ;; Patterns can be preceded by an open-paren (Bug#1320).
-         (if (= (char-before (point)) ?\()
+         (if (eq (char-before (point)) ?\()
              (backward-char 1))
           (while (progn
                    (forward-comment (- (point-max)))