..

original commit: 84a9c8bd6c978865ce99d19f47ae6bd42b48cb7b
1999-06-10 16:29:16 +00:00 · 1999-06-10 16:29:16 +00:00 · f42df1c288
commit f42df1c288
parent b6fa4ca703
1 changed files with 1 additions and 0 deletions
--- a/collects/framework/finder.ss
+++ b/collects/framework/finder.ss
@ -542,6 +542,7 @@
 	[ok-button
 	 (make-object button% "OK" bottom-panel do-ok '(border))])
      (sequence
+        (printf "start-dir: ~s~n" start-dir)
 	(cond
 	  [(and start-dir
 		(directory-exists? start-dir))