diff options
| author | Richard M. Stallman | 1994-09-24 04:11:17 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-09-24 04:11:17 +0000 |
| commit | ac6ff3ed72ceecafb2980aa50deea1a2cbab4a85 (patch) | |
| tree | 88ba260e8d4307c9e2bbda7433007cccbe5ebb53 | |
| parent | dd69dcbc6f823022b43ce6425156db98ad7286d8 (diff) | |
| download | emacs-ac6ff3ed72ceecafb2980aa50deea1a2cbab4a85.tar.gz emacs-ac6ff3ed72ceecafb2980aa50deea1a2cbab4a85.zip | |
(auto-execute): Use \' in auto-mode-alist regexps.
| -rw-r--r-- | lisp/emulation/mlsupport.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emulation/mlsupport.el b/lisp/emulation/mlsupport.el index 63576d52f8b..3596036d0e5 100644 --- a/lisp/emulation/mlsupport.el +++ b/lisp/emulation/mlsupport.el | |||
| @@ -139,7 +139,7 @@ | |||
| 139 | (if (/= (aref pattern 0) ?*) | 139 | (if (/= (aref pattern 0) ?*) |
| 140 | (error "Only patterns starting with * supported in auto-execute")) | 140 | (error "Only patterns starting with * supported in auto-execute")) |
| 141 | (setq auto-mode-alist (cons (cons (concat "\\." (substring pattern 1) | 141 | (setq auto-mode-alist (cons (cons (concat "\\." (substring pattern 1) |
| 142 | "$") | 142 | "\\'") |
| 143 | function) | 143 | function) |
| 144 | auto-mode-alist))) | 144 | auto-mode-alist))) |
| 145 | 145 | ||