From a206ea124c7ea679ea7e60ee3d4f83e931aec4e9 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Thu, 1 Mar 2018 17:58:26 -0800 Subject: [PATCH] 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. --- lisp/emacs-lisp/autoload.el | 2 ++ 1 file changed, 2 insertions(+) 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))))))) -- 2.39.5