/[emacs]/emacs/lisp/international/mule.el
ViewVC logotype

Diff of /emacs/lisp/international/mule.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.193 by handa, Tue Oct 7 01:29:35 2003 UTC revision 1.194 by handa, Tue Oct 7 07:33:22 2003 UTC
# Line 1123  Return the resulting coding system." Line 1123  Return the resulting coding system."
1123    "Define SYMBOL as a coding-system that is defined on demand.    "Define SYMBOL as a coding-system that is defined on demand.
1124    
1125  FROM is a form to evaluate to define the coding-system."  FROM is a form to evaluate to define the coding-system."
1126    (put symbol 'coding-system-define-form form))    (put symbol 'coding-system-define-form form)
1127      (setq coding-system-alist (cons (list (symbol-name symbol))
1128                                      coding-system-alist)))
1129    
1130  (defun set-buffer-file-coding-system (coding-system &optional force)  (defun set-buffer-file-coding-system (coding-system &optional force)
1131    "Set the file coding-system of the current buffer to CODING-SYSTEM.    "Set the file coding-system of the current buffer to CODING-SYSTEM.

Legend:
Removed from v.1.193  
changed lines
  Added in v.1.194

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26