Add easy-hugo-select-file

masasam · Dec 1, 2018 · fa86f77 · fa86f77
1 parent 179f776
commit fa86f77
Showing 1 changed file with 15 additions and 0 deletions.
diff --git a/easy-hugo.el b/easy-hugo.el
@@ -2078,6 +2078,21 @@ Optional prefix ARG says how many lines to move; default is one line."
 	  nil t)))
   (easy-hugo))
 
+;;;###autoload
+(defun easy-hugo-select-file ()
+  "Select file you want to open."
+  (interactive)
+  (find-file
+   (concat (expand-file-name easy-hugo-postdir easy-hugo-basedir)
+	   "/"
+	   (completing-read
+	    "Complete file: "
+	    (delete ".."
+		    (delete "."
+			    (directory-files
+			     (expand-file-name easy-hugo-postdir easy-hugo-basedir))))
+	    nil t))))
+
 (defun easy-hugo--directory-list (list)
   "Return only directories in LIST."
   (if list