From: Kenichi Handa <handa@m17n.org>
Date: Tue, 7 Oct 2003 01:29:35 +0000 (+0000)
Subject: (autoload-coding-system): New function.
X-Git-Tag: ttn-vms-21-2-B4~8588
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2b96ab33e69abf5319d831e9db3435878b86369d;p=emacs.git

(autoload-coding-system): New function.
---

diff --git a/lisp/international/mule.el b/lisp/international/mule.el
index a82ead3999a..1ccd26db6c1 100644
--- a/lisp/international/mule.el
+++ b/lisp/international/mule.el
@@ -1119,6 +1119,12 @@ Return the resulting coding system."
 		     first eol)))
     first))
 
+(defun autoload-coding-system (symbol form)
+  "Define SYMBOL as a coding-system that is defined on demand.
+
+FROM is a form to evaluate to define the coding-system."
+  (put symbol 'coding-system-define-form form))
+
 (defun set-buffer-file-coding-system (coding-system &optional force)
   "Set the file coding-system of the current buffer to CODING-SYSTEM.
 This means that when you save the buffer, it will be converted