]> git.eshelyaron.com Git - emacs.git/commitdiff
Revert recent project-find-file change
authorStephen Leake <stephen_leake@stephe-leake.org>
Mon, 20 May 2019 22:24:47 +0000 (15:24 -0700)
committerStephen Leake <stephen_leake@stephe-leake.org>
Mon, 20 May 2019 22:24:47 +0000 (15:24 -0700)
* lisp/progmodes/project.el (project-find-file): Delete recently added
'filename' arg; just use project-find-file-in.

lisp/progmodes/project.el

index e44cee2133f55dafcb37d445e1952532089b2a5c..ec7df78efc79cd16051c11098ebe35d186866846 100644 (file)
@@ -443,14 +443,14 @@ pattern to search for."
     (read-regexp "Find regexp" (and id (regexp-quote id)))))
 
 ;;;###autoload
-(defun project-find-file (&optional filename)
+(defun project-find-file ()
   "Visit a file (with completion) in the current project's roots.
 The completion default is the filename at point, if one is
 recognized."
   (interactive)
   (let* ((pr (project-current t))
          (dirs (project-roots pr)))
-    (project-find-file-in (or filename (thing-at-point 'filename)) dirs pr)))
+    (project-find-file-in (thing-at-point 'filename) dirs pr)))
 
 ;;;###autoload
 (defun project-or-external-find-file ()