Mercurial > emacs
comparison lisp/emacs-lisp/autoload.el @ 105886:544761863e24
* emacs-lisp/autoload.el (autoload-rubric): Always issue a provide
statement.
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Fri, 06 Nov 2009 19:12:55 +0000 |
parents | e413a8093e28 |
children | ee0a7551c875 |
comparison
equal
deleted
inserted
replaced
105885:8103235103a7 | 105886:544761863e24 |
---|---|
264 " --- automatically extracted " (or type "autoloads") "\n" | 264 " --- automatically extracted " (or type "autoloads") "\n" |
265 ";;\n" | 265 ";;\n" |
266 ";;; Code:\n\n" | 266 ";;; Code:\n\n" |
267 "\n" | 267 "\n" |
268 ;; This is used outside of autoload.el. | 268 ;; This is used outside of autoload.el. |
269 (if feature | 269 "(provide '" |
270 (concat "(provide '" | 270 (if (stringp feature) |
271 (if (stringp feature) feature | 271 feature |
272 (file-name-sans-extension basename)) | 272 (file-name-sans-extension basename)) |
273 ")\n") | 273 ")\n" |
274 "") | |
275 ";; Local Variables:\n" | 274 ";; Local Variables:\n" |
276 ";; version-control: never\n" | 275 ";; version-control: never\n" |
277 ";; no-byte-compile: t\n" | 276 ";; no-byte-compile: t\n" |
278 ";; no-update-autoloads: t\n" | 277 ";; no-update-autoloads: t\n" |
279 ";; coding: utf-8\n" | 278 ";; coding: utf-8\n" |