Commit e127a722 authored by Dave Love's avatar Dave Love
Browse files

(make-coding-system): Purecopy doc-string.

parent cda74479
......@@ -636,7 +636,7 @@ a value of `safe-charsets' in PLIST."
(aset coding-spec coding-spec-type-idx type)
(aset coding-spec coding-spec-mnemonic-idx mnemonic)
(aset coding-spec coding-spec-doc-string-idx
(if (stringp doc-string) doc-string ""))
(purecopy (if (stringp doc-string) doc-string "")))
(cond ((= type 0)
(setq coding-category 'coding-category-emacs-mule))
((= type 1)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment