Mercurial > hg > xemacs-beta

diff lisp/autoload.el @ 4303:cee827542370

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2007-12-04 20:18:33 by aidan] Implement coding system autoloads; use them for the variable-length ISO 2022 Latin coding systems.
author aidan
date Tue, 04 Dec 2007 20:18:43 +0000
parents 1dabc28c10d0
children 6ad202d453cb
line wrap: on
line diff
--- a/lisp/autoload.el	Mon Dec 03 22:51:15 2007 +0000
+++ b/lisp/autoload.el	Tue Dec 04 20:18:43 2007 +0000
@@ -280,7 +280,9 @@
 				  ',varname 'custom-variable)
 	     (custom-add-load ',varname
 			      ,(plist-get rest :require))))))
-
+     ;; Coding systems. #### Would be nice to handle the docstring here too.
+     ((memq car '(make-coding-system make-8-bit-coding-system))
+      `(autoload-coding-system ,(nth 1 form) '(load ,file)))
      ;; nil here indicates that this is not a special autoload form.
      (t nil))))