From mboxrd@z Thu Jan 1 00:00:00 1970 From: "Thomas S. Dye" Subject: Re: One org file, multiple exports, is it possible? Date: Wed, 26 May 2010 08:42:35 -1000 Message-ID: <36A649F1-C9F6-43C4-9B81-CD6A51F9B515@tsdye.com> References: <855B9DE3-A7FD-42B4-A863-DE036065EBD1@gmail.com> <6B0AFD3C-BF59-4DB6-823F-471107A380F4@tsdye.com> <81206149-B01D-4837-A7A5-0ABF94920FE1@gmail.com> <56FE52EC-18B8-46FE-B0B8-266DE70E0A38@tsdye.com> <646DB2B5-DFE0-422F-BD11-AA2117E76644@tsdye.com> <87632cljw4.fsf@gollum.intra.norang.ca> Mime-Version: 1.0 (Apple Message framework v936) Content-Type: text/plain; charset=US-ASCII; format=flowed; delsp=yes Content-Transfer-Encoding: 7bit Return-path: Received: from [140.186.70.92] (port=41374 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1OHLZb-0002fa-Nz for emacs-orgmode@gnu.org; Wed, 26 May 2010 14:44:03 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1OHLZV-0002oY-6y for emacs-orgmode@gnu.org; Wed, 26 May 2010 14:43:20 -0400 Received: from oproxy1-pub.bluehost.com ([66.147.249.253]:60618 helo=outbound-mail-359.bluehost.com) by eggs.gnu.org with smtp (Exim 4.69) (envelope-from ) id 1OHLZU-0002ns-PN for emacs-orgmode@gnu.org; Wed, 26 May 2010 14:43:17 -0400 In-Reply-To: <87632cljw4.fsf@gollum.intra.norang.ca> 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: Bernt Hansen Cc: kmartino@pobox.com, emacs-orgmode@gnu.org, Carsten Dominik Aloha all, First, many thanks to Carsten, Bernt, Nick and Mark for help with my recent publishing woes. After much semi-informed tinkering, I think I've isolated one problem. As background, this problem cropped up for me when I incorporated Karl Martino's setup for exporting parts of an org file to different targets. With the following minimal .emacs, org-publish-get-project-from- filename reports (wrong-type-argument stringp ("index.org")). This function is called when I select [P] publish current project from *Org Export/Publishing Help*. I've included a backtrace below. I discovered this behavior after I incorporated Karl's publication project into my lengthy org-publish-projects-alist. Then, I was unable to publish any of my projects using [P] publish current project. They all returned the same error-- (wrong-type-argument stringp ("index.org")). Hopefully, here follow the pertinent details: Org-mode version 6.36trans (release_6.36.96.g5b68) dk$ /Applications/emacs.app/Contents/MacOS/Emacs -Q -l ~/.minimal.emacs & ---- .minimal.emacs ----- (add-to-list 'load-path (expand-file-name "~/.emacs.d/src/org/lisp")) (add-to-list 'auto-mode-alist '("\\.\\(org\\|org_archive\\|txt\\)$" . org-mode)) (setq org-agenda-files '("/tmp/test.org")) (require 'org-install) (require 'org-habit) (global-set-key "\C-cl" 'org-store-link) (global-set-key "\C-ca" 'org-agenda) (global-set-key "\C-cb" 'org-iswitchb) ; going non-minimal here on (require 'org-publish) (setq org-publish-project-alist '( ; Karl Martino's setup modified for my paths ("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")) string-match(("index.org") "/Users/dk/org/temp/index.org") (and i (string-match i filename)) (or (and i (string-match i filename)) (and (not ...) (string-match xm filename))) (if (or (and i ...) (and ... ...)) (progn (setq project-name ...) (throw ... project-name))) (when (or (and i ...) (and ... ...)) (setq project-name (car prj)) (throw (quote p-found) project-name)) (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 (plist-get ... :components) (let* ... ...)) (setq --cl-dolist- temp-- (cdr --cl-dolist-temp--))) (let ((--cl-dolist-temp-- org-publish-project-alist) prj) (while -- cl-dolist-temp-- (setq prj ...) (unless ... ...) (setq --cl-dolist- temp-- ...)) nil) (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 ... :components) (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-alist)) org-publish-get-project-from-filename("/Users/dk/org/temp/ index.org" up) (let ((project ...) (org-publish-use-timestamps-flag ...)) (if (not project) (error "File %s is not part of any known project" ...)) (org- publish project)) (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-sentinel p ...) (message "Background process \"%s\": started" p)) (if subtree-p (progn ... ...)) (call-interactively (nth 1 ass)) (when (and bpos ...) (let ... ... ... ... ...))) (let* ((bg ...) subtree-p (help "[t] insert the export option template\n[v] limit export to visible part of outline tree\n[1] only export the current subtree\n[SPC] publish enclosing subtree (with LaTeX_CLASS or EXPORT_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[m] export as Freemind mind map\n[x] export 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 files [c] ...as one combined file\n\n[F] publish current file [P] publish current project\n[X] publish a project... [E] publish every projects") (cmds ...) r1 r2 ass (cpos ...) (cbuf ...) bpos) (save-excursion (save-window- excursion ... ... ... ... ... ... ...)) (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) All the best, Tom On May 24, 2010, at 5:50 PM, Bernt Hansen wrote: > "Thomas S. Dye" writes: > >> Aloha Carsten, >> >> I think I need to know what is meant by "minimal .emacs." > > I have a minimal.emacs which is a stripped down .emacs that only has > what I need to invoke org-mode for reproducing a problem. > > ,----[ minimal.emacs ] > | (add-to-list 'load-path (expand-file-name "~/git/org-mode/lisp")) > | (add-to-list 'auto-mode-alist '("\\.\\(org\\|org_archive\\|txt\\) > $" . org-mode)) > | (setq org-agenda-files '("/tmp/test.org")) > | (require 'org-install) > | (require 'org-habit) > | > | (global-set-key "\C-cl" 'org-store-link) > | (global-set-key "\C-ca" 'org-agenda) > | (global-set-key "\C-cb" 'org-iswitchb) > `---- > > and I load this with emacs -Q -l ~/minimal.emacs. I'll normally > edit it > to add whatever is needed to reproduce the problem in org-mode. > > Using a stripped down minimal .emacs files removes broken custom > settings as the cause of the issue and makes it easy to reproduce for > other people. > > HTH, > Bernt