diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2021-03-23 22:38:41 -0400 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2021-03-23 22:38:41 -0400 |
commit | 952550258dcf06bc03662974aa6b6db9d792aedb (patch) | |
tree | 0f7eec9ac7e1d5ef74fa2b146278bf6ff669a9f5 /lisp/progmodes/ebnf2ps.el | |
parent | 667e002e91a26c20089c5843254a39b771b64ab7 (diff) | |
download | emacs-952550258dcf06bc03662974aa6b6db9d792aedb.tar.gz |
* lisp/progmodes/ebnf-*.el: Use lexical-binding
* lisp/progmodes/ebnf-abn.el:
* lisp/progmodes/ebnf-bnf.el:
* lisp/progmodes/ebnf-dtd.el:
* lisp/progmodes/ebnf-ebx.el:
* lisp/progmodes/ebnf-iso.el:
* lisp/progmodes/ebnf-otz.el:
* lisp/progmodes/ebnf-yac.el: Enable lexical-binding.
* lisp/progmodes/ebnf2ps.el (ebnf-apply-style1)
(ebnf-insert-ebnf-prologue): Use lexical-binding.
Diffstat (limited to 'lisp/progmodes/ebnf2ps.el')
-rw-r--r-- | lisp/progmodes/ebnf2ps.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/progmodes/ebnf2ps.el b/lisp/progmodes/ebnf2ps.el index b376423c185..c95b351d0c7 100644 --- a/lisp/progmodes/ebnf2ps.el +++ b/lisp/progmodes/ebnf2ps.el @@ -2920,7 +2920,7 @@ See `ebnf-style-database' documentation." value (and (car value) (ebnf-apply-style1 (car value))) (while (setq value (cdr value)) - (set (caar value) (eval (cdar value))))))) + (set (caar value) (eval (cdar value) t)))))) (defun ebnf-check-style-values (values) @@ -5487,7 +5487,7 @@ killed after process termination." (ebnf-shape-value ebnf-chart-shape ebnf-terminal-shape-alist)) (format "/UserArrow{%s}def\n" - (let ((arrow (eval ebnf-user-arrow))) + (let ((arrow (eval ebnf-user-arrow t))) (if (stringp arrow) arrow ""))) @@ -6290,7 +6290,7 @@ killed after process termination." (defun ebnf-log-header (format-str &rest args) (when ebnf-log (apply - 'ebnf-log + #'ebnf-log (concat "\n\n===============================================================\n\n" format-str) |