From: ueno <ueno>
Date: Fri, 26 Aug 2005 08:41:04 +0000 (+0000)
Subject: Enable add-on if it is not disabled by default.
X-Git-Tag: channel-coding-branchpoint~51
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=bc1318e01466e00fb44da2f7d10321f83c9ba359;p=elisp%2Friece.git

Enable add-on if it is not disabled by default.
---

diff --git a/lisp/riece-addon.el b/lisp/riece-addon.el
index 34796f1..a773032 100644
--- a/lisp/riece-addon.el
+++ b/lisp/riece-addon.el
@@ -207,7 +207,9 @@
     (funcall (intern (concat (symbol-name addon) "-insinuate")))
     (put addon 'riece-addon-insinuated t)
     (if verbose
-	(message "Add-on %S is insinuated" addon))))
+	(message "Add-on %S is insinuated" addon))
+    (unless (get addon 'riece-addon-default-disabled)
+      (riece-enable-addon addon t))))
 
 (defun riece-uninstall-addon (addon &optional verbose)
   (if (not (get addon 'riece-addon-insinuated))