@@ -20,19 +20,31 @@
 
 ;;======================================================================
 ;; Test info panel
 ;;======================================================================
 
-(use format)
+(import format)
 (require-library iup)
 (import (prefix iup iup:))
 
-(use canvas-draw)
+(import canvas-draw)
+
+(import sqlite3 srfi-1
+	;; posix
+	regex regex-case srfi-69)
 
-(use sqlite3 srfi-1 posix regex regex-case srfi-69)
-(import (prefix sqlite3 sqlite3:))
+(import
+ (prefix sqlite3 sqlite3:)
 
+ chicken.file.posix
+ chicken.port
+ chicken.pretty-print
+ chicken.string
+ chicken.time
+ 
+	
+)
 (declare (unit dashboard-guimonitor))
 (declare (uses common))
 (declare (uses keys))
 (declare (uses db))
 (declare (uses tasks))