@@ -30,11 +30,11 @@
 
 (require-library iup)
 (import (prefix iup iup:))
 (require-library ini-file)
 (import (prefix ini-file ini:))
-
+(use (prefix mtconfigf configf:))
 (use canvas-draw)
 (import canvas-draw-iup)
 
 (use sqlite3 srfi-1 posix regex regex-case srfi-69)
 (import (prefix sqlite3 sqlite3:))
@@ -716,11 +716,11 @@
   (let* ((fname   (conc exe-dir "/." exe-name ".config")))
     (ini:property-separator-patt " *  *")
     (ini:property-separator #\space)
     (if (common:file-exists? fname)
 	;; (ini:read-ini fname)
-	(read-config fname #f #t)
+	(configf:read-config fname #f #t)
 	(make-hash-table))))
 
 (define (datashare:process-action configdat action . args)
   (case (string->symbol action)
     ((get)