@@ -758,11 +758,11 @@
 ;; Weird special calls that need to run *after* the server has started?
 ;;======================================================================
 
 (if (args:get-arg "-list-targets")
     (let ((targets (common:get-runconfig-targets)))
-      (print "Found "(length targets) " targets")
+      (debug:print 1 "Found "(length targets) " targets")
       (case (string->symbol (or (args:get-arg "-dumpmode") "alist"))
 	((alist)
 	 (for-each (lambda (x)
 		     ;; (print "[" x "]"))
 		     (print x))
@@ -941,10 +941,12 @@
 	    #f ;; index to high, should raise an error I suppose
 	    (vector-ref datavec indx))
 	#f)))
 
 ;; NOTE: list-runs and list-db-targets operate on local db!!!
+;;
+;; IDEA: megatest list -runname blah% ...
 ;;
 (if (or (args:get-arg "-list-runs")
 	(args:get-arg "-list-db-targets"))
     (if (launch:setup-for-run)
 	(let* (;; (dbstruct    (make-dbr:dbstruct path: *toppath* local: (args:get-arg "-local")))