Skip to content

Instantly share code, notes, and snippets.

@tildedave
Created January 18, 2011 12:42
Show Gist options
  • Save tildedave/784383 to your computer and use it in GitHub Desktop.
Save tildedave/784383 to your computer and use it in GitHub Desktop.
;; Directory Conversion Functions
(defun list-to-directory (list)
(let (value)
(dolist (element list value)
(setq value (file-name-as-directory (concat value element))))))
(defun path-to-file (path filename)
(concat (list-to-directory path) filename))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment