From 6a7ceddcab9071463e92d73e8dc16412ad776ad0 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 16 Aug 2000 20:49:45 +0000 Subject: [PATCH] Add local-variable settings to the generated file. --- lisp/cus-dep.el | 6 ++++++ lisp/finder.el | 11 ++++++++++- 2 files changed, 16 insertions(+), 1 deletion(-) diff --git a/lisp/cus-dep.el b/lisp/cus-dep.el index 180d6679b3e..4ce2932ab72 100644 --- a/lisp/cus-dep.el +++ b/lisp/cus-dep.el @@ -162,10 +162,16 @@ Usage: emacs -batch -l ./cus-dep.el -f custom-make-dependencies DIRS" \(provide 'cus-load) +;;; Local Variables: +;;; version-control: never +;;; no-byte-compile: t +;;; no-update-autoloads: t +;;; End: ;;; cus-load.el ends here\n") (let ((kept-new-versions 10000000)) (save-buffer)) (message "Generating cus-load.el...done") (kill-emacs)) + ;;; cus-dep.el ends here diff --git a/lisp/finder.el b/lisp/finder.el index 4eb7d9949e9..037083e20b5 100644 --- a/lisp/finder.el +++ b/lisp/finder.el @@ -159,7 +159,15 @@ no arguments compiles from `load-path'." ))) (directory-files (or d "."))))) (or dirs load-path)) - (insert "))\n\n(provide 'finder-inf)\n\n;;; finder-inf.el ends here\n") + (insert "))\n +\(provide 'finder-inf) + +;;; Local Variables: +;;; version-control: never +;;; no-byte-compile: t +;;; no-update-autoloads: t +;;; End: +;;; finder-inf.el ends here\n") (kill-buffer "*finder-scratch*") (eval-current-buffer) ;; So we get the new keyword list immediately (basic-save-buffer)))) @@ -333,6 +341,7 @@ finder directory, \\[finder-exit] = quit, \\[finder-summary] = help"))) (and (get-buffer "*Finder Category*") (kill-buffer "*Finder Category*"))) + (provide 'finder) ;;; finder.el ends here -- 2.39.2