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

[Stefan Monnier]

Index: emacs/lisp/progmodes/sh-script.el
diff -c emacs/lisp/progmodes/sh-script.el:1.171 
emacs/lisp/progmodes/sh-script.el:1.172
*** emacs/lisp/progmodes/sh-script.el:1.171     Thu Nov 17 07:36:41 2005
--- emacs/lisp/progmodes/sh-script.el   Mon Nov 21 22:24:13 2005
***************
*** 986,992 ****
                  (when (memq (char-before) '(?\" ?\'))
                    (condition-case nil (progn (backward-sexp 1) t)
                      (error nil)))))
!         (forward-comment (- (point-max)))
          (when (eq (char-before) ?|)
            (backward-char 1) t)))
      (when (save-excursion (backward-char 2) (looking-at ";;\\|in"))
--- 986,996 ----
                  (when (memq (char-before) '(?\" ?\'))
                    (condition-case nil (progn (backward-sexp 1) t)
                      (error nil)))))
!           (while (progn
!                    (forward-comment (- (point-max)))
!                    ;; Maybe we've bumped into an escaped newline.
!                    (sh-is-quoted-p (point)))
!             (backward-char 1))
          (when (eq (char-before) ?|)
            (backward-char 1) t)))
      (when (save-excursion (backward-char 2) (looking-at ";;\\|in"))