# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1065490175 0
# Node ID 2e3d2f94a2babb18e6940c3989dbd18793c9d5a2
# Parent  f4d906e31662a15cb5b8861d3e727f3ca5ada435
(autoload-coding-system): New function.

diff -r f4d906e31662 -r 2e3d2f94a2ba lisp/international/mule.el
--- a/lisp/international/mule.el	Tue Oct 07 01:29:12 2003 +0000
+++ b/lisp/international/mule.el	Tue Oct 07 01:29:35 2003 +0000
@@ -1119,6 +1119,12 @@
 		     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