emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Orgmode] fix in org-publish-update-timestamp


From: Richard KLINDA
Subject: [Orgmode] fix in org-publish-update-timestamp
Date: Fri, 29 May 2009 15:59:22 +0200
User-agent: Gnus/5.110003 (No Gnus v0.3) XEmacs/21.4 (Instant Classic, linux)

I use the ~ character to denote my home directory in
org-publish-project-alist (:base-directory and :publishing-directory),
like:

,----
| (setq org-publish-project-alist
|       (list
|        '("foo" . (:base-directory "~/doc/foo/" ...
`----

When directories are given this way and ORG-PUBLISH-UPDATE-TIMESTAMP
uses the touch command to update the timestamp, it doesn't work because
Emacs should expand the ~/ into the home directory via EXPAND-FILE-NAME.

See the attached patch, Carsten please include this, thanks.

diff --git a/lisp/org-publish.el b/lisp/org-publish.el
index c6c7421..399fdd3 100644
--- a/lisp/org-publish.el
+++ b/lisp/org-publish.el
@@ -233,7 +233,7 @@ If there is no timestamp, create one."
     (if (and (fboundp 'set-file-times)
             (not newly-created-timestamp))
        (set-file-times timestamp-file)
-      (call-process "touch" nil 0 nil timestamp-file))))
+      (call-process "touch" nil 0 nil (expand-file-name timestamp-file)))))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;; Mapping files to project names

-- 
Richard

reply via email to

[Prev in Thread] Current Thread [Next in Thread]