;; (defcustom org-templates-directory "~/workenv/templates/" "The directory which org templates have been put" :type 'string :group 'orgtools) ;;;###autoload (defun org-use-template (template) (interactive (let ((templated-used (read-file-name "Choose template:" (expand-file-name org-templates-directory) nil nil nil))) (list templated-used))) (when template (insert-file-contents template) ;; enable file local variables defined in template (hack-local-variables))) (provide 'org-templates)