mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Fix header comment in generated bovine grammar file

Browse source 
* lisp/cedet/semantic/bovine/grammar.el (bovine--make-parser-1):
Fix header comment in generated scm-by.el.
This commit is contained in:
Glenn Morris 2018-02-28 13:44:12 -05:00
parent e8edf4ad60
commit 088dfdd5d5
1 changed files with 7 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lisp/cedet/semantic/bovine/grammar.el
View file

@ -475,6 +475,7 @@ Menu items are appended to the common grammar menu.")
;; This is with-demoted-errors.
(condition-case err
(with-current-buffer (find-file-noselect infile)
(setq infile buffer-file-name)
(if outdir (setq default-directory outdir))
(semantic-grammar-create-package nil t))
(error (message "%s" (error-message-string err)) nil)))
@ -509,8 +510,12 @@ Menu items are appended to the common grammar menu.")
;;; Commentary:
;;
;; This file was generated from admin/grammars/"
lang ".by.
;; This file was generated from "
(if (string-match "\\(OFFadmin/grammars/.*\\.by\\)\\'" infile)
(match-string 1 infile)
(concat "admin/grammars/"
(if (string-equal lang "scm") "scheme" lang) ".by"))
".
;;; Code:
")