# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 1008184664 0
# Node ID 21b646d266aae779daa5e22776728b9667bcf029
# Parent  e839854f133e0ee8600161bd4bc7dd5f4403e21b
(unify-8859-on-encoding-mode)
(unify-8859-on-decoding-mode): Swap the code in their bodies.  Add
:version.

diff -r e839854f133e -r 21b646d266aa lisp/international/ucs-tables.el
--- a/lisp/international/ucs-tables.el	Wed Dec 12 13:43:37 2001 +0000
+++ b/lisp/international/ucs-tables.el	Wed Dec 12 19:17:44 2001 +0000
@@ -1276,26 +1276,30 @@
 See also command `unify-8859-on-decoding-mode'."
   :group 'mule
   :global t
+  :version 21.3				; who knows...?
   :init-value nil
   (if unify-8859-on-encoding-mode
-      (set-char-table-parent standard-translation-table-for-decode
-			 ucs-mule-8859-to-mule-unicode)
-    (set-char-table-parent standard-translation-table-for-decode nil)))
+      (ucs-unify-8859 t)
+    (ucs-fragment-8859 t)))
 
 ;;;###autoload
 (define-minor-mode unify-8859-on-decoding-mode
-  "Set up translation tables for unifying ISO 8859 characters on decoding.
-On decoding, i.e. input operations, non-ASCII characters from the
+  "Set up translation table for unifying ISO 8859 characters on decoding.
+On decoding -- i.e. input operations -- non-ASCII characters from the
 built-in ISO 8859 charsets are unified by mapping them into the
 `iso-latin-1' and `mule-unicode-0100-24ff' charsets.
 
+This sets the parent of `standard-translation-table-for-decode'.
+
 See also command `unify-8859-on-encoding-mode'."
   :group 'mule
   :global t
+  :version 21.3				; who knows...?
   :init-value nil
   (if unify-8859-on-decoding-mode
-      (ucs-unify-8859 t)
-    (ucs-fragment-8859 t)))
+      (set-char-table-parent standard-translation-table-for-decode
+			     ucs-mule-8859-to-mule-unicode)
+    (set-char-table-parent standard-translation-table-for-decode nil)))
 
 (defun ucs-insert (arg)
   "Insert the Emacs character representation of the given Unicode.