From: Kenichi Handa Date: Sat, 22 Nov 2003 07:46:20 +0000 (+0000) Subject: (make-coding-system): Fix generation of properties. X-Git-Tag: emacs-pretest-23.0.90~8295^2~1710 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=28380f179dbf70c116a9e2937591c93fe4d6621b;p=emacs.git (make-coding-system): Fix generation of properties. --- diff --git a/lisp/international/mule.el b/lisp/international/mule.el index 143f3342879..757f4c1e049 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el @@ -1041,7 +1041,7 @@ Use `define-coding-system' instead." (setq key :valids))) (setq plist (plist-put plist key (cdr elt)))) plist)) - (plist-put properties :mnemonic mnemonic) + (setq properties (plist-put properties :mnemonic mnemonic)) (plist-put properties :coding-type type) (cond ((eq eol-type 0) (setq eol-type 'unix)) ((eq eol-type 1) (setq eol-type 'dos))