summaryrefslogtreecommitdiff
path: root/admin/grammars/bovine-grammar.el
diff options
context:
space:
mode:
Diffstat (limited to 'admin/grammars/bovine-grammar.el')
-rw-r--r--admin/grammars/bovine-grammar.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/admin/grammars/bovine-grammar.el b/admin/grammars/bovine-grammar.el
index 3ff15fab66f..2201668731d 100644
--- a/admin/grammars/bovine-grammar.el
+++ b/admin/grammars/bovine-grammar.el
@@ -434,7 +434,7 @@ Menu items are appended to the common grammar menu.")
(grammar-setupcode-builder . bovine-grammar-setupcode-builder)
)))
-(add-to-list 'auto-mode-alist '("\\.by$" . bovine-grammar-mode))
+(add-to-list 'auto-mode-alist '("\\.by\\'" . bovine-grammar-mode))
(defvar-mode-local bovine-grammar-mode semantic-grammar-macros
'(
@@ -459,7 +459,7 @@ Menu items are appended to the common grammar menu.")
(semantic-mode 1)
;; Loop through each .by file in current directory, and run
;; `semantic-grammar-batch-build-one-package' to build the grammar.
- (dolist (f (directory-files default-directory nil ".by$"))
+ (dolist (f (directory-files default-directory nil "\\.by\\'"))
(let ((packagename
(condition-case err
(with-current-buffer (find-file-noselect f)
@@ -467,7 +467,7 @@ Menu items are appended to the common grammar menu.")
(error (message "%s" (error-message-string err)) nil)))
lang)
(when (and packagename
- (string-match "^semantic-\\(.*\\)-by.el$" packagename))
+ (string-match "^semantic-\\(.*\\)-by\\.el\\'" packagename))
(setq lang (match-string 1 packagename))
(with-temp-buffer
(insert-file-contents packagename)