@@ -1161,11 +1161,11 @@
 				       (lambda ()
 					 ;; (print "obj: " obj " val: " val " unk: " unk)
 					 (dboard:tabdat-run-name-set! tabdat txt) ;; (iup:attribute obj "VALUE"))
 					 (dashboard:update-run-command tabdat))
 				       "command-runname-selector tb action"))
-			   #:value (or default-run-name (dboard:tabdat-run-name tabdat))))
+			   #:value (or (args:get-arg "-runname") default-run-name (dboard:tabdat-run-name tabdat))))
 	  (lb (iup:listbox #:expand "HORIZONTAL"
 			   #:dropdown "YES"
 			   #:action (lambda (obj val index lbstate)
 				      (debug:catch-and-dump
 				       (lambda ()