diff lisp/progmodes/sh-script.el @ 92878:0d903db06886

(sh-font-lock-quoted-subshell): Fix handling of \ and '.

--- a/lisp/progmodes/sh-script.el	Thu Mar 13 13:29:11 2008 +0000
+++ b/lisp/progmodes/sh-script.el	Thu Mar 13 14:34:20 2008 +0000
@@ -1001,11 +1001,11 @@
           (state (if (eq (char-before) ?`) 'backquote 'code))
           ;; Stacked states in the context.
           (states '(double-quote)))
-      (while (and state (progn (skip-chars-forward "^'\\\"`$()" limit)
+      (while (and state (progn (skip-chars-forward "^'\\\\\"`$()" limit)
                                (< (point) limit)))
         ;; unescape " inside a $( ... ) construct.
         (case (char-after)
-          (?\' (skip-chars-forward "^'" limit))
+          (?\' (forward-char 1) (skip-chars-forward "^'" limit))
           (?\\ (forward-char 1))
           (?\" (case state
                  (double-quote (setq state (pop states)))