(sh-get-kw): | is not among the allowed chars for a keyword.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3d434df..2b55153 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2006-10-10  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * progmodes/sh-script.el (sh-get-kw): | is not among the allowed chars
+       for a keyword.
+
 2006-10-09  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * newcomment.el (comment-valid-prefix-p): Make the check

diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el
index a15cc21..83b4bde 100644 (file)
--- a/lisp/progmodes/sh-script.el
+++ b/lisp/progmodes/sh-script.el
@@ -2517,7 +2517,7 @@ If AND-MOVE is non-nil then move to end of word."
        (goto-char where))
     (prog1
        (buffer-substring (point)
-                         (progn (skip-chars-forward "^ \t\n;&")(point)))
+                         (progn (skip-chars-forward "^ \t\n;&|()")(point)))
       (unless and-move
        (goto-char start)))))