Revision: 6688
Author: ek.kato
Date: Thu Aug  5 19:05:22 2010
Log: * scm/plugin.scm (load-module-conf) : Remove duplicate in the
  enabled-im-list when user-conf-file is load.

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

Modified:
 /trunk/scm/plugin.scm

=======================================
--- /trunk/scm/plugin.scm       Tue Jul 27 22:09:43 2010
+++ /trunk/scm/plugin.scm       Thu Aug  5 19:05:22 2010
@@ -32,6 +32,7 @@
 ;;; SUCH DAMAGE.
 ;;;;

+(require-extension (srfi 1))
 (require "util.scm")
 (require "dynlib.scm")

@@ -89,9 +90,11 @@
                (if (try-load user-conf-file)
                    (begin
                      (set! installed-im-module-list
-                           (append orig-module-list installed-im-module-list))
+                        (delete-duplicates
+ (append orig-module-list installed-im-module-list)))
                      (set! enabled-im-list
-                           (append orig-enabled-list enabled-im-list))))))))))
+                        (delete-duplicates
+ (append orig-enabled-list enabled-im-list)))))))))))


 ;; TODO: write test

Reply via email to