# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1208513863 0
# Node ID 1acbae4306b21d39cd12d2dddf52f10579b42dfc
# Parent  2b060bb498d619010a1b515797d948170fb81c3b
(char-coding-system-table): Remove redundant obsolescence info in docstring.
(charset-list, generic-char-p, set-char-table-default): Fix typos in
obsolescence decarations.

diff -r 2b060bb498d6 -r 1acbae4306b2 lisp/international/mule.el
--- a/lisp/international/mule.el	Fri Apr 18 10:15:09 2008 +0000
+++ b/lisp/international/mule.el	Fri Apr 18 10:17:43 2008 +0000
@@ -474,7 +474,7 @@
 This function is provided for backward compatibility.
 Now we have the variable `charset-list'."
   charset-list)
-(make-obsolete 'charset-list "Use variable `charset-list'" "23.1")
+(make-obsolete 'charset-list "use variable `charset-list'." "23.1")
 
 
 ;;; CHARACTER
@@ -484,7 +484,7 @@
 (defun generic-char-p (char)
   "Always return nil.  This is provided for backward compatibility."
   nil)
-(make-obsolete 'generic-char-p "Generic characters no longer exist" "23.1")
+(make-obsolete 'generic-char-p "generic characters no longer exist." "23.1")
 
 (defun make-char-internal (charset-id &optional code1 code2)
   (let ((charset (aref emacs-mule-charset-table charset-id)))
@@ -826,7 +826,7 @@
 	  (cons :name (cons name (cons :docstring (cons (purecopy docstring)
 							props)))))
     (setcdr (assq :plist common-attrs) props)
-    (apply 'define-coding-system-internal 
+    (apply 'define-coding-system-internal
 	   name (mapcar 'cdr (append common-attrs spec-attrs)))))
 
 (defun coding-system-doc-string (coding-system)
@@ -935,8 +935,8 @@
     codings))
 
 (defconst char-coding-system-table nil
-  "This is an obsolete variable.
-It exists just for backward compatibility, and the value is always nil.")
+  "It exists just for backward compatibility, and the value is always nil.")
+(make-obsolete-variable 'char-coding-system-table nil "23.1")
 
 (defun transform-make-coding-system-args (name type &optional doc-string props)
   "For internal use only.
@@ -2270,7 +2270,7 @@
       (make-char-table 'ignore-relative-composition))
 
 (make-obsolete 'set-char-table-default
-	       "Generic characters no longer exist" "23.1")
+	       "generic characters no longer exist." "23.1")
 
 ;;; Built-in auto-coding-functions: