From mboxrd@z Thu Jan  1 00:00:00 1970
From: =?utf-8?Q?=C5=81ukasz?= Stelmach <lukasz.stelmach@iem.pw.edu.pl>
Subject: Re: [PATCH] can't :include files in org-publish-project-alist
Date: Thu, 02 Sep 2010 16:46:54 +0200
Message-ID: <87occgryn5.fsf@dasa3.iem.pw.edu.pl>
References: <87occwjb6k.fsf@kotik.lan>
	<18070.1282401296@gamaville.dokosmarshall.org>
	<87k4njkj6v.fsf@kotik.lan> <87fwxs1bvc.fsf@gnu.org>
Mime-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: 8bit
Return-path: <emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org>
Received: from [140.186.70.92] (port=52023 helo=eggs.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.43) id 1OrBZx-0004R0-2I
	for emacs-orgmode@gnu.org; Thu, 02 Sep 2010 11:19:55 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69)
	(envelope-from <geo-emacs-orgmode@m.gmane.org>) id 1OrB4E-0007D3-VO
	for emacs-orgmode@gnu.org; Thu, 02 Sep 2010 10:47:08 -0400
Received: from lo.gmane.org ([80.91.229.12]:55306)
	by eggs.gnu.org with esmtp (Exim 4.69)
	(envelope-from <geo-emacs-orgmode@m.gmane.org>) id 1OrB4E-0007Ct-Nn
	for emacs-orgmode@gnu.org; Thu, 02 Sep 2010 10:47:06 -0400
Received: from list by lo.gmane.org with local (Exim 4.69)
	(envelope-from <geo-emacs-orgmode@m.gmane.org>) id 1OrB4C-0003Ek-QY
	for emacs-orgmode@gnu.org; Thu, 02 Sep 2010 16:47:04 +0200
Received: from dasa3.iem.pw.edu.pl ([194.29.147.110])
	by main.gmane.org with esmtp (Gmexim 0.1 (Debian))
	id 1AlnuQ-0007hv-00
	for <emacs-orgmode@gnu.org>; Thu, 02 Sep 2010 16:47:04 +0200
Received: from lukasz.stelmach by dasa3.iem.pw.edu.pl with local (Gmexim 0.1
	(Debian)) id 1AlnuQ-0007hv-00
	for <emacs-orgmode@gnu.org>; Thu, 02 Sep 2010 16:47:04 +0200
List-Id: "General discussions about Org-mode." <emacs-orgmode.gnu.org>
List-Unsubscribe: <http://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/emacs-orgmode>
List-Post: <mailto:emacs-orgmode@gnu.org>
List-Help: <mailto:emacs-orgmode-request@gnu.org?subject=help>
List-Subscribe: <http://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=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

Bastien <bastien.guerry@wikimedia.fr> writes:

> :base-directory now allows a directory name with no ending slash.
>
> I did this in a slightly different way than the one you suggest:
>
> ,----
> |  	  (let* ((r (plist-get (cdr prj) :recursive))
> | -		 (b (expand-file-name (plist-get (cdr prj) :base-directory)))
> | +		 (b (expand-file-name (file-name-as-directory
> | +				       (plist-get (cdr prj) :base-directory))))
> |  		 (x (or (plist-get (cdr prj) :base-extension) "org"))
> `----

Great :-) I didn't know there is the `file-name-as-directory' function.

-- 
Miłego dnia,
Łukasz Stelmach