ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix typo.

This commit is contained in:
Carsten Dominik 2008-07-25 14:17:35 -07:00
parent d2697cf11e
commit 6de2032ff7
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/org-publish.el
View File

@ -554,7 +554,7 @@ See `org-publish-org-to' to the list of arguments."
(abbreviate-file-name filename))))
(error "Can't publish file outside of a project")))))
(project-plist (cdr project))
(ftname (file-truename file-name))
(ftname (file-truename filename))
(publishing-function
(or (plist-get project-plist :publishing-function)
'org-publish-org-to-html))
@ -564,7 +564,7 @@ See `org-publish-org-to' to the list of arguments."
(file-truename (plist-get project-plist :publishing-directory))))
tmp-pub-dir)
(setq tmp-pub-dir
(file-name-directory
(file-name-dirqctory
(concat pub-dir
(and (string-match (regexp-quote base-dir) ftname)
(substring ftname (match-end 0))))))