Undo the last change.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 15c8e29..87d8b4e 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,9 +1,3 @@
-2004-05-21  Daiki Ueno  <ueno@unixuser.org>
-
-       * riece-addon.el (riece-enable-addon): Check if riece-*-enable
-       exists.
-       (riece-disable-addon): Check if riece-*-disable exists.
-
 2004-05-21  Daiki Ueno  <ueno@unixuser.org>
 
        * riece-mini.el (riece-mini-enabled): New flag.

diff --git a/lisp/riece-addon.el b/lisp/riece-addon.el
index 9eed0a5..6ad7f7f 100644 (file)
--- a/lisp/riece-addon.el
+++ b/lisp/riece-addon.el
@@ -100,8 +100,7 @@
       (if (symbol-value enabled)
          (if riece-debug
              (message "Can't enable add-on %S" addon))
-       (funcall (or (intern-soft (concat (symbol-name addon) "-enable"))
-                    #'ignore))
+       (funcall (intern (concat (symbol-name addon) "-enable")))
        (if riece-debug
            (message "Add-on %S enabled" addon))))))
 
@@ -112,9 +111,7 @@
            (message "Add-on %S doesn't support enable/disable" addon))
       (if (symbol-value enabled)
          (progn
-           (funcall (or (intern-soft (concat (symbol-name (car addons))
-                                             "-disable"))
-                        #'ignore))
+           (funcall (intern (concat (symbol-name (car addons)) "-disable")))
            (if riece-debug
                (message "Add-on %S disabled" (car addons))))
        (if riece-debug