diff --git a/collects/mred/private/path-dialog.ss b/collects/mred/private/path-dialog.ss
index 924688c0..3ec5f557 100644
--- a/collects/mred/private/path-dialog.ss
+++ b/collects/mred/private/path-dialog.ss
@@ -598,7 +598,7 @@
                            [(list-box-dclick) (do-enter)]))]))
 
       (define text
-        (new text-field% [parent this] [label #f]
+        (new text-field% [parent this] [label "Filename:"]
           [init-value (cond [(path? filename) (path->string filename)]
                             [(string? filename) filename]
                             [else ""])]