~made location an optional argument in tangle-all

This commit is contained in:
AChavali
2019-12-31 00:28:26 +00:00
parent 736b16ffb3
commit 36435f410e

View File

@@ -57,7 +57,8 @@ A procedure that parses all the org files in a given directory into Emacs lisp
files, using the parser function made. Assume all org files in the "location" files, using the parser function made. Assume all org files in the "location"
directory contribute to the config. directory contribute to the config.
#+BEGIN_SRC elisp #+BEGIN_SRC elisp
(defun oreodave/literate/tangle-all (location) (defun oreodave/literate/tangle-all (&optional location)
(or location (setq location doom-private-dir))
(interactive) (interactive)
(message "Starting compilation process") (message "Starting compilation process")
(let ((files (directory-files-recursively location ".org"))) (let ((files (directory-files-recursively location ".org")))