Permalink
Browse files

refine the function `elixir-mix--elixir-project-root`

there is no need for an argument.
  • Loading branch information...
1 parent 531f00b commit 5a834a55c0d63cf9117d52f769a04f3d160a495c @tonini committed Oct 26, 2013
Showing with 5 additions and 5 deletions.
  1. +5 −5 elixir-mix.el
View
@@ -150,11 +150,11 @@
(set (make-local-variable 'kill-buffer-hook)
'elixir-mix--compilation-kill-any-orphan-proc)))
-(defun elixir-mix--elixir-project-root (&optional directory)
- "Finds the root directory of the project by walking the
- directory tree until it finds a elixir project root indicator."
- (let* ((directory (file-name-as-directory (or directory (expand-file-name default-directory)))))
- (locate-dominating-file directory elixir-mix--elixir-project-root-indicator)))
+(defun elixir-mix--elixir-project-root ()
+ "Finds the root directory of the project.
+It walking the directory tree until it finds a elixir project root indicator."
+ (let* ((file (file-name-as-directory (expand-file-name default-directory))))
+ (locate-dominating-file file elixir-mix--elixir-project-root-indicator)))
(defun elixir-mix--completing-read (prompt cmdlist)
(completing-read prompt cmdlist nil t nil nil (car cmdlist)))

0 comments on commit 5a834a5

Please sign in to comment.