Revision: 7142
Author:   ek.kato
Date:     Tue Jun 14 21:31:16 2011
Log:      * Merge r7130 from trunk.

http://code.google.com/p/uim/source/detail?r=7142

Modified:
 /branches/1.7/scm/im-custom.scm

=======================================
--- /branches/1.7/scm/im-custom.scm     Sun May 15 21:24:22 2011
+++ /branches/1.7/scm/im-custom.scm     Tue Jun 14 21:31:16 2011
@@ -822,6 +822,13 @@
   (N_ "Notify agent name")
   (N_ "long description will be here."))

+(custom-add-hook 'notify-agent
+                 'custom-set-hooks
+                 (lambda ()
+                   (if (symbol-bound? 'uim-notify-load)
+                     (uim-notify-load (symbol->string
+                                        notify-agent)))))
+
 ;;
 ;; Http
 ;;

Reply via email to