possible Bug: non-interactive publishing (emacs 22.1)

["orgmode@h-rd.org" <orgmode@h-rd.org>]

Hi Carsten,

when using org to publish non-interactively under 22.3.1 I get  
sometimes an error, depending on which publishing function I call.   
This does not happen during interactive calling of the publishing  
function (i.e. M-x org-publish ).

no error:
emacs -q -batch -l ../org-init.el --eval='(org-publish-all)'

with error:
emacs -q -batch -l ../org-init.el --eval='(org-publish "h-rd.org" t)'

(obviously the project h-rd.org exists, and is published without error  
and all components from org-publish-all)
error message:

Starting emacs
Loading subst-ksc...
Loading subst-gb2312...
Loading subst-big5...
Loading subst-jis...
Debugger entered--Lisp error: (wrong-type-argument listp "h-rd.org")
   cdr("h-rd.org")
   (plist-get (cdr p) :components)
   (setq components (plist-get (cdr p) :components))
   (if (setq components (plist-get ... :components)) (setq rest  
(append ... rest)                                                       
          ) (push p rtn))
   (while (setq p (pop rest)) (if (setq components ...) (setq rest  
...) (push p r                                                          
       tn)))
   (let ((rest projects-alist) rtn p components) (while (setq p ...)  
(if ... ...                                                             
     ...)) (nreverse (org-publish-delete-dups ...)))
   org-publish-expand-projects(("h-rd.org"))
   (mapc (lambda (project) (let* ... ... ... ... ... ...))  
(org-publish-expand-pr                                                  
               ojects projects))
   org-publish-projects(("h-rd.org"))
   (let* ((org-publish-use-timestamps-flag ...)) (org-publish-projects  
(list proj                                                              
   ect)))
   (save-window-excursion (let* (...) (org-publish-projects ...)))
   org-publish("h-rd.org" t)
   eval((org-publish "h-rd.org" t))
   command-line-1(("-l" "../org-init.el" "--eval=(org-publish  
\"h-rd.org\" t)"))
   command-line()
   normal-top-level()

emacs finished


greetings.