Expand file-name before use
Without expanding the file name to an absolute file name the following invocation would go wrong: ,---- | kaarvork some-template . `---- Because `kaarvok' would not know what to do with the `.' and errors would occur.
This commit is contained in:
parent
4c157a4d5d
commit
2ddc4a8061
1 changed files with 2 additions and 1 deletions
|
@ -133,7 +133,8 @@ Replace any occurrences of variables with user-povided values."
|
||||||
(interactive "MTemplate: \nGDestination: ")
|
(interactive "MTemplate: \nGDestination: ")
|
||||||
(let ((kaarvok-value-alist))
|
(let ((kaarvok-value-alist))
|
||||||
(kaarvok-copy-directory
|
(kaarvok-copy-directory
|
||||||
(concat kaarvok-templates-directory "/" template) destination)))
|
(concat kaarvok-templates-directory "/" template)
|
||||||
|
(expand-file-name destination))))
|
||||||
|
|
||||||
(provide 'kaarvok)
|
(provide 'kaarvok)
|
||||||
;;; kaarvok.el ends here
|
;;; kaarvok.el ends here
|
||||||
|
|
Loading…
Reference in a new issue