aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPaul Eggert2018-03-01 17:58:26 -0800
committerPaul Eggert2018-03-01 18:16:43 -0800
commita206ea124c7ea679ea7e60ee3d4f83e931aec4e9 (patch)
tree39793c47bcb6b4b23dcf5368ecd0bdcff3bf5fd3
parenta4605cd60d79e5dc050d722f8c4360f11ce65232 (diff)
downloademacs-a206ea124c7ea679ea7e60ee3d4f83e931aec4e9.tar.gz
emacs-a206ea124c7ea679ea7e60ee3d4f83e931aec4e9.zip
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.
-rw-r--r--lisp/emacs-lisp/autoload.el2
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."
324 (setcdr p nil) 324 (setcdr p nil)
325 (princ "\n(" outbuf) 325 (princ "\n(" outbuf)
326 (let ((print-escape-newlines t) 326 (let ((print-escape-newlines t)
327 (print-escape-control-characters t)
327 (print-quoted t) 328 (print-quoted t)
328 (print-escape-nonascii t)) 329 (print-escape-nonascii t))
329 (dolist (elt form) 330 (dolist (elt form)
@@ -348,6 +349,7 @@ put the output in."
348 outbuf)) 349 outbuf))
349 (terpri outbuf))) 350 (terpri outbuf)))
350 (let ((print-escape-newlines t) 351 (let ((print-escape-newlines t)
352 (print-escape-control-characters t)
351 (print-quoted t) 353 (print-quoted t)
352 (print-escape-nonascii t)) 354 (print-escape-nonascii t))
353 (print form outbuf))))))) 355 (print form outbuf)))))))