Re: Re: One org file, multiple exports, is it possible?

From: "Thomas S. Dye" <tsd@tsdye.com>
To: nicholas.dokos@hp.com
Cc: kmartino@pobox.com, Bernt Hansen <bernt@norang.ca>,
	emacs-orgmode@gnu.org,
	Carsten Dominik <carsten.dominik@gmail.com>
Subject: Re: Re: One org file, multiple exports, is it possible?
Date: Wed, 26 May 2010 12:28:12 -1000	[thread overview]
Message-ID: <2FF8A80C-C4F3-4FDE-B0D2-50D03EE4110B@tsdye.com> (raw)
In-Reply-To: <19272.1274909875@alphaville.usa.hp.com>

[-- Attachment #1.1: Type: text/plain, Size: 2711 bytes --]

On May 26, 2010, at 11:37 AM, Nick Dokos wrote:

> Thomas S. Dye <tsd@tsdye.com> wrote:
>
>
>> 	("work"
>> 	 :base-directory "~/org/temp/"
>> 	 :base-extension "org"
>> 	 :publishing-directory "~/org/temp/publish-work/"
>> 	 :publishing-function org-publish-org-to-latex
>> 	 :select-tags ("@WORK")
>> 	 :title "Work Notes"
>> 	 :include ("index.org")  <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
>> 	 :exclude "\\.org$"
>> 	 )
>> ))
>> ---- .minimal.emacs -----
>>
>> Debugger entered--Lisp error: (wrong-type-argument stringp
>> ("index.org")) <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
>
> This is complaining that ``("index.org")'' is not a string, and indeed
> it isn't: it's a list with one element. Should the :include line above
> be
>
>        :include "index.org"
>
> perhaps? But I'm shooting from the hip here, so take it with the  
> appropriate
> grain of salt.
>
> Nick

Hi Nick,

The documentation for org-publish-projects-alist suggests  
that :include wants a list:

> The :include property may be used to include extra files.  Its
> value may be a list of filenames to include. The filenames are
> considered relative to the base directory.

When I tried :include "index.org" I got this:

Debugger entered--Lisp error: (wrong-type-argument sequencep 105)
   concat("~/org/temp/" 105)
   (expand-file-name (concat base-dir f))
   ...

I'm not going to pretend I know what I'm talking about here, but  
AFAICT the variable i in the following code needs some attention  
before it goes to string-match.  According to the documentation, plist- 
get just returns the value assigned to a property (or nil) without  
doing anything to it, so i should be a list when it is passed to  
string-match.  string-match wants REGEXP here, apparently not as a  
list.  I couldn't persuade emacs to cough up the definition of REGEXP,  
but my brief forays into the emacs and org-mode source code lead me to  
believe it is probably a string.

> (defun org-publish-get-project-from-filename (filename &optional up)
>   "Return the project FILENAME belongs."
>   (let* ((filename (expand-file-name filename))
> 	 project-name)
>
>     (catch 'p-found
>       (dolist (prj org-publish-project-alist)
> 	(unless (plist-get (cdr prj) :components)
> 	  ;; [[info:org:Selecting%20files]] shows how this is supposed to  
> work:
> 	  (let* ((r (plist-get (cdr prj) :recursive))
> 		 (b (expand-file-name (plist-get (cdr prj) :base-directory)))
> 		 (x (plist-get (cdr prj) :base-extension))
> 		 (e (plist-get (cdr prj) :exclude))
> 		 (i (plist-get (cdr prj) :include))
> 		 (xm (concat "^" b (if r ".+" "[^/]+") "\\.\\(" x "\\)$")))
> 	    (when (or
> 		   (and i (string-match i filename))

All the best,
Tom

[-- Attachment #1.2: Type: text/html, Size: 7401 bytes --]

[-- Attachment #2: Type: text/plain, Size: 201 bytes --]

_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode