Index: dcommon.scm
==================================================================
--- dcommon.scm
+++ dcommon.scm
@@ -1086,18 +1086,19 @@
 					       (dboard:tabdat-run-name-set! tabdat val)
 					       (dashboard:update-run-command tabdat))))
 				       "command-runname-selector lb action"))))
 	  (refresh-runs-list (lambda ()
 			       (if (dashboard:database-changed? commondat tabdat context-key: 'runname-selector-runs-list)
-				   (let* ((target        (dboard:tabdat-target-string tabdat))
-					  (runs-for-targ (rmt:get-runs-by-patt (dboard:tabdat-keys tabdat) "%" target #f #f #f 0))
+				   (let* (;; (target        (dboard:tabdat-target-string tabdat))
+					  (runs-for-targ (rmt:get-runs-by-patt (dboard:tabdat-keys tabdat) "%" #f #f #f #f 0))
 					  (runs-header   (vector-ref runs-for-targ 0))
 					  (runs-dat      (vector-ref runs-for-targ 1))
 					  (run-names     (cons default-run-name 
 							       (map (lambda (x)
 								      (db:get-value-by-header x runs-header "runname"))
 								    runs-dat))))
+				     ;; (print "DEBUGINFO: run-names=" run-names)
 				     ;; (iup:attribute-set! lb "REMOVEITEM" "ALL")
 				     (iuplistbox-fill-list lb run-names selected-item: default-run-name))))))
      ;; (dboard:tabdat-updater-for-runs-set! tabdat refresh-runs-list)
      (dboard:commondat-add-updater commondat refresh-runs-list tab-num: tab-num)
      ;; (refresh-runs-list)
@@ -1225,11 +1226,10 @@
 							   (let* ((selected     (not (member test-name patterns)))
 								  (newpatt-list (if selected
 										    (cons test-name patterns)
 										    (delete test-name patterns)))
 								  (newpatt      (string-intersperse newpatt-list "\n")))
-                                                             (print "INFO: newpatt=" newpatt ", patterns=" patterns ", test-patts=" test-patts)
 							     (iup:attribute-set! test-patterns-textbox "VALUE" newpatt)
 							     (iup:attribute-set! obj "REDRAW" "ALL")
 							     (hash-table-set! selected-tests test-name selected)
 							     (dboard:tabdat-test-patts-set!-use tabdat (dboard:lines->test-patt newpatt))
 							     (dashboard:update-run-command tabdat)