From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 23 Jul 1998 07:23:08 +0000 (+0000)
Subject: (auto-mode-alist): Recognize shell profiles without dirname.
X-Git-Tag: emacs-20.3~274
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7af59a4c1816a61434e99d5b272db2cdf4bcd3cb;p=emacs.git

(auto-mode-alist): Recognize shell profiles without dirname.
---

diff --git a/lisp/files.el b/lisp/files.el
index beffa7e05fc..426ac6f3c31 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -1225,9 +1225,9 @@ run `normal-mode' explicitly."
     ("\\$CHANGE_LOG\\$\\.TXT" . change-log-mode)
     ("\\.scm\\.[0-9]*\\'" . scheme-mode)
     ("\\.[ck]?sh\\'\\|\\.shar\\'\\|/\\.z?profile\\'" . sh-mode)
-    ("/\\.\\(bash_profile\\|z?login\\|bash_login\\|z?logout\\)\\'" . sh-mode)
-    ("/\\.\\(bash_logout\\|[kz]shrc\\|bashrc\\|t?cshrc\\|esrc\\)\\'" . sh-mode)
-    ("/\\.\\([kz]shenv\\|xinitrc\\|startxrc\\|xsession\\)\\'" . sh-mode)
+    ("\\(/\\|\\`)\\.\\(bash_profile\\|z?login\\|bash_login\\|z?logout\\)\\'" . sh-mode)
+    ("\\(/\\|\\`)\\.\\(bash_logout\\|[kz]shrc\\|bashrc\\|t?cshrc\\|esrc\\)\\'" . sh-mode)
+    ("\\(/\\|\\`)\\.\\([kz]shenv\\|xinitrc\\|startxrc\\|xsession\\)\\'" . sh-mode)
 ;;; The following should come after the ChangeLog pattern
 ;;; for the sake of ChangeLog.1, etc.
 ;;; and after the .scm.[0-9] pattern too.