From: Paul Eggert Date: Fri, 2 Mar 2018 01:58:26 +0000 (-0800) Subject: Arrange for loaddefs files to be greppable X-Git-Tag: emacs-27.0.90~5575 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a206ea124c7ea679ea7e60ee3d4f83e931aec4e9;p=emacs.git 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. --- 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)))))))