* alist.el (del-alist): Simplified.

[elisp/apel.git] / emu.el

diff --git a/emu.el b/emu.el
index 407ea4b..fce2080 100644 (file)
--- a/emu.el
+++ b/emu.el
@@ -223,7 +223,8 @@ find-file-hooks, etc.
        (autoload 'enriched-decode "tinyrich")
        ))
 
-(if (or (< emacs-major-version 20)
+(if (or (and (eq emacs-major-version 19)
+            (>= emacs-minor-version (if (featurep 'xemacs) 14 29)))
        (and (eq emacs-major-version 20)
             (< emacs-minor-version (if (featurep 'xemacs) 3 1))))
     (eval-after-load "enriched"
@@ -244,7 +245,7 @@ find-file-hooks, etc.
                          ;; variables in the wrong buffer.
                          (if orig-buf (set-buffer orig-buf))
                          (funcall si:enriched-initial-annotation)))))))
-            (si::enriched-encode))))))
+            (si::enriched-encode from to))))))
 
 
 ;;; @ end