Mercurial > emacs

changeset 62550:4f78132b042b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(sh-mode, sh-get-word): Minor regexp fixes.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 20 May 2005 13:28:38 +0000
parents 744535f6366b
children 428c1f634761
files lisp/progmodes/sh-script.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/sh-script.el	Fri May 20 13:25:58 2005 +0000
+++ b/lisp/progmodes/sh-script.el	Fri May 20 13:28:38 2005 +0000
@@ -1389,7 +1389,7 @@
 	   (cond ((looking-at "#![ \t]?\\([^ \t\n]*/bin/env[ \t]\\)?\\([^ \t\n]+\\)")
 		  (match-string 2))
 		 ((and buffer-file-name
-		       (string-match "\\.m?spec$" buffer-file-name))
+		       (string-match "\\.m?spec\\'" buffer-file-name))
 		  "rpm")))))
     (sh-set-shell (or interpreter sh-shell-file) nil nil))
   (run-hooks 'sh-mode-hook))
@@ -2290,7 +2290,7 @@
 	(if (looking-at "[\"'`]")
 	    (sh-safe-forward-sexp)
 	  ;; (> (skip-chars-forward "^ \t\n\"'`") 0)
-	  (> (skip-chars-forward "-_a-zA-Z\$0-9") 0)
+	  (> (skip-chars-forward "-_a-zA-Z$0-9") 0)
 	  ))
     (buffer-substring start (point))
     ))