diff --git a/contrib/babel/lisp/org-babel-tangle.el b/contrib/babel/lisp/org-babel-tangle.el
index 184382233..7629c0ca2 100644
--- a/contrib/babel/lisp/org-babel-tangle.el
+++ b/contrib/babel/lisp/org-babel-tangle.el
@@ -62,7 +62,7 @@ file using `load-file'."
 specify a default export file for all source blocks.  Optional
 argument LANG can be used to limit the exported source code
 blocks by language."
-  (interactive "f")
+  (interactive "fFile to tangle: \nP")
   (save-window-excursion (find-file file) (org-babel-tangle target-file lang)))
 
 (defun org-babel-tangle (&optional target-file lang)