@@ -16,22 +16,21 @@
 ;;     You should have received a copy of the GNU General Public License
 ;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
 ;;
 ;;======================================================================
 
-(import format)
-
 (declare (uses ducttape-lib))
 (declare (uses bigmod))
 (declare (uses debugprint))
 (declare (uses commonmod))
 (declare (uses configfmod))
 (declare (uses dashboard-context-menu))
-(declare (uses dashboard-guimonitor))
+;; (declare (uses dashboard-guimonitor))
 (declare (uses dashboard-tests))
 (declare (uses dbmod))
 (declare (uses dcommon))
+(declare (uses gutils))
 (declare (uses itemsmod))
 (declare (uses launchmod))
 (declare (uses mtmod))
 (declare (uses mtargs))
 (declare (uses mtver))
@@ -41,10 +40,11 @@
 (declare (uses tree))
 (declare (uses vgmod))
 (declare (uses bigmod.import))
 (declare (uses debugprint.import))
 ;; (declare (uses dashboard-main))
+
 
 (import (prefix iup iup:))
 (import canvas-draw)
 
 ;; (import canvas-draw-iup)
@@ -57,11 +57,12 @@
 	chicken.file.posix
 	chicken.string
 	chicken.process-context
 	regex regex-case srfi-69
 	typed-records
-	sparse-vectors)
+	sparse-vectors
+	format)
 
 
 ;; (include "common_records.scm")
 ;; (include "db_records.scm")
 ;; (include "run_records.scm")
@@ -82,10 +83,12 @@
 	processmod
 	runsmod
 	subrunmod
 	vgmod
 	dcommon
+	gutils
+	tree
 	dashboard-context-menu
 	dashboard-tests)
 
 (define help (conc 
 	      "Megatest Dashboard, documentation at http://www.kiatoa.com/fossils/megatest