From mboxrd@z Thu Jan 1 00:00:00 1970 From: =?utf-8?Q?S=C3=A9bastien_Vauban?= Subject: Error when publishing to HTML Date: Thu, 17 Feb 2011 21:33:29 +0100 Message-ID: <804o825rl2.fsf@missioncriticalit.com> Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Return-path: 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-mXXj517/zsQ@public.gmane.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org-mXXj517/zsQ@public.gmane.org To: emacs-orgmode-mXXj517/zsQ@public.gmane.org Hello, I've got a couple of files located at `~/src/web-in-org/org/'. They make pa= rt of the following project: #+begin_src emacs-lisp (add-to-list 'org-publish-project-alist '(("orgfiles" :base-directory "~/src/web-in-org/org/" :base-extension "org" :publishing-directory "~/src/web-in-org/public_html/" :publishing-function org-publish-org-to-html :section-numbers nil :table-of-contents nil :auto-sitemap t :sitemap-title "Sitemap" :style "") ("css" :base-directory "~/src/web-in-org/org/css/" :base-extension "css" :publishing-directory "~/src/web-in-org/public_html/css/" :publishing-function org-publish-attachment) ("mysite" :components ("orgfiles" "css")))) #+end_src `org-publish-project-alist' being nil before this, the above is its final value as well. Though, when publishing that project (with `C-c C-e P') from any Org file located in that directory, I now have: --8<---------------cut here---------------start------------->8--- Debugger entered--Lisp error: (wrong-type-argument stringp nil) file-name-as-directory(nil) (expand-file-name (file-name-as-directory (plist-get ... :base-directory)= )) (let* ((r ...) (b ...) (x ...) (e ...) (i ...) (xm ...)) (when (or ... ..= .) (setq project-name ...) (throw ... project-name))) (if (plist-get (cdr prj) :components) nil (let* (... ... ... ... ... ...)= (when ... ... ...))) (unless (plist-get (cdr prj) :components) (let* (... ... ... ... ... ...)= (when ... ... ...))) (while --cl-dolist-temp-- (setq prj (car --cl-dolist-temp--)) (unless (pl= ist-get ... :components) (let* ... ...)) (setq --cl-dolist-temp-- (cdr --cl= -dolist-temp--))) (let ((--cl-dolist-temp-- org-publish-project-alist) prj) (while --cl-dol= ist-temp-- (setq prj ...) (unless ... ...) (setq --cl-dolist-temp-- ...)) n= il) (catch (quote --cl-block-nil--) (let (... prj) (while --cl-dolist-temp-- = ... ... ...) nil)) (cl-block-wrapper (catch (quote --cl-block-nil--) (let ... ... nil))) (block nil (let (... prj) (while --cl-dolist-temp-- ... ... ...) nil)) (dolist (prj org-publish-project-alist) (unless (plist-get ... :component= s) (let* ... ...))) (catch (quote p-found) (dolist (prj org-publish-project-alist) (unless ..= . ...))) (let* ((filename ...) project-name) (catch (quote p-found) (dolist ... ..= .)) (when up (dolist ... ...)) (assoc project-name org-publish-project-alis= t)) org-publish-get-project-from-filename("c:/home/sva/src/web-in-org/org/org= -mode.org" up) (let ((project ...) (org-publish-use-timestamps-flag ...)) (if (not proje= ct) (error "File %s is not part of any known project" ...)) (org-publish pr= oject)) (save-window-excursion (let (... ...) (if ... ...) (org-publish project))) org-publish-current-project(nil) call-interactively(org-publish-current-project) (if (and bg (nth 2 ass) (not ...) (not ...)) (let (...) (set-process-sent= inel p ...) (message "Background process \"%s\": started" p)) (if subtree-p= (progn ... ...)) (call-interactively (nth 1 ass)) (when (and bpos ...) (le= t ... ... ... ... ...))) (let* ((bg ...) (subtree-p ...) (help "[t] insert the export option tem= plate\n[v] limit export to visible part of outline tree\n[1] switch buf= fer/subtree export\n[SPC] publish enclosing subtree (with LaTeX_CLASS or EX= PORT_FILE_NAME prop)\n\n[a/n/u] export as ASCII/Latin-1/UTF-8 [A/N/= U] to temporary buffer\n\n[h] export as HTML [H] to temporary buffer = [R] export region\n[b] export as HTML and open in browser\n\n[l] export as= LaTeX [L] to temporary buffer\n[p] export as LaTeX and process to PDF = [d] ... and open PDF file\n\n[D] export as DocBook [V] export = as DocBook, process to PDF, and open\n\n[j] export as TaskJuggler = [J] ... and open\n\n[m] export as Freemind mind map\n[x] exp= ort as XOXO\n[g] export using Wes Hardaker's generic exporter\n\n[i] export= current file as iCalendar file\n[I] export all agenda files as iCalendar f= iles [c] ...as one combined file\n\n[F] publish current file [P]= publish current project\n[X] publish a project... [E] publish eve= ry projects") (cmds ...) r1 r2 ass (cpos ...) (cbuf ...) bpos) (save-excurs= ion (save-window-excursion ... ... ... ... ... ...)) (redisplay) (and bpos = (goto-char bpos)) (setq r2 (if ... ... r1)) (unless (setq ass ...) (error "= No command associated with key %c" r1)) (if (and bg ... ... ...) (let ... .= .. ...) (if subtree-p ...) (call-interactively ...) (when ... ...))) org-export(nil) call-interactively(org-export nil nil) --8<---------------cut here---------------end--------------->8--- I see it's located at line 520 of org-publish.el, but I don't understand the above error. Any hint? Side question: I thought I could eval a lot on the backtrace itself. But, in the above, I only can "read" the value of `prj' on the 4th line of the backtrace (for info, yes, it is equal to the above value of `org-publish-project-alist'). I can't eval expressions such as `(plist-get ... :base-directory)' because of the 3 dots inside it. Or can I somehow? Best regards, Seb --=20 S=C3=A9bastien Vauban _______________________________________________ Emacs-orgmode mailing list Please use `Reply All' to send replies to the list. Emacs-orgmode-mXXj517/zsQ@public.gmane.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode