/[emacs]/emacs/lisp/progmodes/sh-script.el
ViewVC logotype

Diff of /emacs/lisp/progmodes/sh-script.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.171 by jurta, Thu Nov 17 07:36:41 2005 UTC revision 1.172 by monnier, Mon Nov 21 22:24:13 2005 UTC
# Line 986  Point is at the beginning of the next li Line 986  Point is at the beginning of the next li
986                    (when (memq (char-before) '(?\" ?\'))                    (when (memq (char-before) '(?\" ?\'))
987                      (condition-case nil (progn (backward-sexp 1) t)                      (condition-case nil (progn (backward-sexp 1) t)
988                        (error nil)))))                        (error nil)))))
989            (forward-comment (- (point-max)))            (while (progn
990                       (forward-comment (- (point-max)))
991                       ;; Maybe we've bumped into an escaped newline.
992                       (sh-is-quoted-p (point)))
993                (backward-char 1))
994            (when (eq (char-before) ?|)            (when (eq (char-before) ?|)
995              (backward-char 1) t)))              (backward-char 1) t)))
996      (when (save-excursion (backward-char 2) (looking-at ";;\\|in"))      (when (save-excursion (backward-char 2) (looking-at ";;\\|in"))

Legend:
Removed from v.1.171  
changed lines
  Added in v.1.172

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26