(make-coding-system): If CODING-SYSTEM already exists, override it.

2000-06-05 12:12:26 +00:00
parent 9ebbe4d8b0
commit b48eb508f4
1 changed files with 0 additions and 3 deletions
--- a/lisp/international/mule.el
+++ b/lisp/international/mule.el
@@ -621,9 +621,6 @@ treated as a compiled CCL code.

 2. If PROPERTIES is just a list of character sets, the list is set as
 a value of `safe-charsets' in PLIST."
-  (if (memq coding-system coding-system-list)
-      (error "Coding system %s already exists" coding-system))
-
  ;; Set a value of `coding-system' property.
  (let ((coding-spec (make-vector 5 nil))
 	(no-initial-designation t)