@@ -21,19 +21,10 @@
 ;;======================================================================
 ;; implementation of context menu that pops up on
 ;; right click on test cell in Runs & Runs Summary Tabs
 ;;======================================================================
 
-(use format fmt)
-(require-library iup)
-(import (prefix iup iup:))
-
-(use canvas-draw)
-
-(use srfi-1 posix regex regex-case srfi-69)
-(use (prefix sqlite3 sqlite3:))
-
 (declare (unit dashboard-context-menu))
 (declare (uses common))
 (declare (uses commonmod))
 (declare (uses db))
 (declare (uses gutils))
@@ -41,15 +32,25 @@
 (declare (uses ezsteps))
 ;; (declare (uses sdb))
 ;; (declare (uses filedb))
 (declare (uses subrun))
 
+(use format fmt)
+(require-library iup)
+(import (prefix iup iup:))
+
+(use canvas-draw)
+
+(use srfi-1 posix regex regex-case srfi-69)
+(use (prefix sqlite3 sqlite3:))
+
 (include "common_records.scm")
 (include "db_records.scm")
 (include "run_records.scm")
 
-(import commonmod)
+(import commonmod
+	debugprint)
 
 (define (dboard:launch-testpanel run-id test-id)
   (let* ((dboardexe (common:find-local-megatest "dashboard"))
          (cmd (conc dboardexe
                     " -test " run-id "," test-id