diff options
author | Paul Eggert <eggert@cs.ucla.edu> | 2018-03-01 17:58:26 -0800 |
---|---|---|
committer | Paul Eggert <eggert@cs.ucla.edu> | 2018-03-01 18:16:43 -0800 |
commit | a206ea124c7ea679ea7e60ee3d4f83e931aec4e9 (patch) | |
tree | 39793c47bcb6b4b23dcf5368ecd0bdcff3bf5fd3 /lisp/emacs-lisp/autoload.el | |
parent | a4605cd60d79e5dc050d722f8c4360f11ce65232 (diff) | |
download | emacs-a206ea124c7ea679ea7e60ee3d4f83e931aec4e9.tar.gz |
Arrange for loaddefs files to be greppable
Without this change, ldefs-boot.el contains a couple of stray NUL
bytes, which cause it to be considered to be a non-text file by
tools like GNU grep.
* lisp/emacs-lisp/autoload.el (autoload-print-form):
Set print-escape-control-characters to t.
Diffstat (limited to 'lisp/emacs-lisp/autoload.el')
-rw-r--r-- | lisp/emacs-lisp/autoload.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el index 92ad6155b53..7b4a7d04f92 100644 --- a/lisp/emacs-lisp/autoload.el +++ b/lisp/emacs-lisp/autoload.el @@ -324,6 +324,7 @@ put the output in." (setcdr p nil) (princ "\n(" outbuf) (let ((print-escape-newlines t) + (print-escape-control-characters t) (print-quoted t) (print-escape-nonascii t)) (dolist (elt form) @@ -348,6 +349,7 @@ put the output in." outbuf)) (terpri outbuf))) (let ((print-escape-newlines t) + (print-escape-control-characters t) (print-quoted t) (print-escape-nonascii t)) (print form outbuf))))))) |