From mboxrd@z Thu Jan 1 00:00:00 1970 From: Richard KLINDA Subject: fix in org-publish-update-timestamp Date: Fri, 29 May 2009 15:59:22 +0200 Message-ID: <87d49shux1.fsf@gmail.com> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1MA2fI-00077f-7p for emacs-orgmode@gnu.org; Fri, 29 May 2009 10:02:32 -0400 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1MA2fD-0006zA-3d for emacs-orgmode@gnu.org; Fri, 29 May 2009 10:02:31 -0400 Received: from [199.232.76.173] (port=43369 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1MA2fC-0006yt-T3 for emacs-orgmode@gnu.org; Fri, 29 May 2009 10:02:26 -0400 Received: from viefep15-int.chello.at ([62.179.121.35]:33074) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1MA2fC-0006cg-24 for emacs-orgmode@gnu.org; Fri, 29 May 2009 10:02:26 -0400 Received: from edge01.upc.biz ([192.168.13.236]) by viefep15-int.chello.at (InterMail vM.7.09.01.00 201-2219-108-20080618) with ESMTP id <20090529140215.MCAJ28817.viefep15-int.chello.at@edge01.upc.biz> for ; Fri, 29 May 2009 16:02:15 +0200 Received: from ignotus by localhost with local (masqmail 0.2.21) id 1MA2cE-8Uz-00 for ; Fri, 29 May 2009 15:59:22 +0200 List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org --=-=-= 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. --=-=-= Content-Type: text/x-diff Content-Disposition: inline; filename=touch-fix.patch 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 --=-=-= Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Disposition: inline _______________________________________________ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode --=-=-=--