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.
This commit is contained in:
parent
a4605cd60d
commit
a206ea124c
1 changed files with 2 additions and 0 deletions
|
@ -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)))))))
|
||||
|
|
Loading…
Add table
Reference in a new issue