@@ -20,18 +20,33 @@
 
 ;;======================================================================
 ;; Test info panel
 ;;======================================================================
 
-(use format fmt)
+(import format fmt)
 (require-library iup)
 (import (prefix iup iup:))
 
-(use canvas-draw)
+(import canvas-draw)
 
-(use srfi-1 posix regex regex-case srfi-69)
-(use (prefix sqlite3 sqlite3:))
+(import
+ srfi-1
+ ;; posix
+ regex regex-case srfi-69
+ chicken.file
+ chicken.file.posix
+ chicken.port
+ chicken.pretty-print
+ chicken.string
+ chicken.time
+ srfi-18
+ chicken.condition
+ chicken.process-context
+ 
+)
+	
+(import (prefix sqlite3 sqlite3:))
 
 (declare (unit dashboard-tests))
 (declare (uses common))
 (declare (uses db))
 (declare (uses gutils))