emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [O] Worg publishing issue


From: Nick Dokos
Subject: Re: [O] Worg publishing issue
Date: Wed, 06 Feb 2013 10:26:24 -0500

Suvayu Ali <address@hidden> wrote:

> Hello Worgers,
> 
> Amidsts all the commotion about documentation for the new exporter, I
> committed a very early incomplete draft article documenting the new
> beamer exporter.
> 
> <http://orgmode.org/cgit.cgi/worg.git/commit/?id=d7dfb6133bcea0127d0c386334a833e8ac64323e>
> 
> But I see that it is not being published.  I got the following
> publishing error after pushing my commit.
> 
> remote: Publishing file
> /home/emacs/git/worg/org-tutorials/org-beamer/org-e-beamer.org using
> `org-publish-org-to-html'
> remote: Exporting...
> remote: Wrong type argument: stringp, nil
> remote: worg publish process 16964 exited at 02/05/address@hidden:01:27
> 
> Any ideas?
> 

Just to add another data point (or perhaps more confusion): I checked
out worg after your submission and tried my local batch build. I get the
same error but from org-hacks.org. I cleaned out the timestamps and
remade: org-hacks.org was again the first culprit. When I try publishing
it interactively, it succeeds. I added a (setq debug-on-error t) to my
batch init file and I get the attached backtrace - no idea what's causing
it.

NB: it didn't republish org-hacks since it is done already, so the backtrace
happened on org-annotation-helper.org. I expect that if I try publishing
it interactively, it will succeed and I'll get a backtrace on some other
file, further down in the publishing sequence. AFAICT, the backtrace on
org-hacks.org and the backtrace on org-annotation-helper.org are the same.

Nick


Publishing file 
/home/nick/src/emacs/org/Worg/org-contrib/org-annotation-helper.org using 
`org-publish-org-to-html'
Exporting...
Loading cc-langs...
...
  org-export-replace-src-segments-and-examples()
  (progn (erase-buffer) (insert string) (setq case-fold-search t) (let 
((inhibit-read-only t)) (remove-text-properties (point-min) (point-max) (quote 
(read-only t)))) (org-export-kill-licensed-text) (let ((org-inhibit-startup t)) 
(org-mode)) (setq case-fold-search t) (org-clone-local-variables source-buffer 
"^\\(org-\\|orgtbl-\\)") (org-install-letbind) (run-hooks (quote 
org-export-preprocess-hook)) (untabify (point-min) (point-max)) 
(org-export-handle-include-files-recurse) (run-hooks (quote 
org-export-preprocess-after-include-files-hook)) 
(org-export-remove-archived-trees archived-trees) 
(org-export-remove-comment-blocks-and-subtrees) (org-export-handle-export-tags 
(plist-get parameters :select-tags) (plist-get parameters :exclude-tags)) 
(run-hooks (quote org-export-preprocess-after-tree-selection-hook)) 
(org-export-remove-tasks (plist-get parameters :tasks)) (if (plist-get 
parameters :footnotes) (progn (org-footnote-normalize nil parameters))) 
(org-export-mark-list-end) (org-export-preprocess-apply-macros) (run-hooks 
(quote org-export-preprocess-after-macros-hook)) (org-export-blocks-preprocess) 
(org-export-mark-list-properties) 
(org-export-replace-src-segments-and-examples) 
(org-export-protect-colon-examples) (org-export-convert-protected-spaces) (setq 
target-alist (org-export-define-heading-targets target-alist)) (run-hooks 
(quote org-export-preprocess-after-headline-targets-hook)) 
(org-export-remember-html-container-classes) 
(org-export-remove-or-extract-drawers drawers (plist-get parameters :drawers)) 
(if (plist-get parameters :skip-before-1st-heading) (progn (goto-char 
(point-min)) (if (re-search-forward "^\\(#.*\n\\)?\\*+[     ]" nil t) (progn 
(delete-region (point-min) (match-beginning 0)) (goto-char (point-min)) (insert 
"\n"))))) (if (plist-get parameters :add-text) (progn (goto-char (point-min)) 
(insert (plist-get parameters :add-text) "\n"))) 
(org-export-remove-headline-metadata parameters) (setq target-alist 
(org-export-handle-invisible-targets target-alist)) (run-hooks (quote 
org-export-preprocess-before-selecting-backend-code-hook)) 
(org-export-select-backend-specific-text) (org-export-protect-quoted-subtrees) 
(org-export-remove-clock-lines) (org-export-protect-verbatim) 
(org-export-mark-blockquote-verse-center) (run-hooks (quote 
org-export-preprocess-after-blockquote-hook)) (if (plist-get parameters 
:timestamps) nil (org-export-remove-timestamps)) (setq target-alist 
(org-export-attach-captions-and-attributes target-alist)) 
(org-export-mark-radio-links) (run-hooks (quote 
org-export-preprocess-after-radio-targets-hook)) 
(org-export-concatenate-multiline-links) (run-hooks (quote 
org-export-preprocess-before-normalizing-links-hook)) 
(org-export-normalize-links) ...)
  (unwind-protect (progn (erase-buffer) (insert string) (setq case-fold-search 
t) (let ((inhibit-read-only t)) (remove-text-properties (point-min) (point-max) 
(quote (read-only t)))) (org-export-kill-licensed-text) (let 
((org-inhibit-startup t)) (org-mode)) (setq case-fold-search t) 
(org-clone-local-variables source-buffer "^\\(org-\\|orgtbl-\\)") 
(org-install-letbind) (run-hooks (quote org-export-preprocess-hook)) (untabify 
(point-min) (point-max)) (org-export-handle-include-files-recurse) (run-hooks 
(quote org-export-preprocess-after-include-files-hook)) 
(org-export-remove-archived-trees archived-trees) 
(org-export-remove-comment-blocks-and-subtrees) (org-export-handle-export-tags 
(plist-get parameters :select-tags) (plist-get parameters :exclude-tags)) 
(run-hooks (quote org-export-preprocess-after-tree-selection-hook)) 
(org-export-remove-tasks (plist-get parameters :tasks)) (if (plist-get 
parameters :footnotes) (progn (org-footnote-normalize nil parameters))) 
(org-export-mark-list-end) (org-export-preprocess-apply-macros) (run-hooks 
(quote org-export-preprocess-after-macros-hook)) (org-export-blocks-preprocess) 
(org-export-mark-list-properties) 
(org-export-replace-src-segments-and-examples) 
(org-export-protect-colon-examples) (org-export-convert-protected-spaces) (setq 
target-alist (org-export-define-heading-targets target-alist)) (run-hooks 
(quote org-export-preprocess-after-headline-targets-hook)) 
(org-export-remember-html-container-classes) 
(org-export-remove-or-extract-drawers drawers (plist-get parameters :drawers)) 
(if (plist-get parameters :skip-before-1st-heading) (progn (goto-char 
(point-min)) (if (re-search-forward "^\\(#.*\n\\)?\\*+[     ]" nil t) (progn 
(delete-region (point-min) (match-beginning 0)) (goto-char (point-min)) (insert 
"\n"))))) (if (plist-get parameters :add-text) (progn (goto-char (point-min)) 
(insert (plist-get parameters :add-text) "\n"))) 
(org-export-remove-headline-metadata parameters) (setq target-alist 
(org-export-handle-invisible-targets target-alist)) (run-hooks (quote 
org-export-preprocess-before-selecting-backend-code-hook)) 
(org-export-select-backend-specific-text) (org-export-protect-quoted-subtrees) 
(org-export-remove-clock-lines) (org-export-protect-verbatim) 
(org-export-mark-blockquote-verse-center) (run-hooks (quote 
org-export-preprocess-after-blockquote-hook)) (if (plist-get parameters 
:timestamps) nil (org-export-remove-timestamps)) (setq target-alist 
(org-export-attach-captions-and-attributes target-alist)) 
(org-export-mark-radio-links) (run-hooks (quote 
org-export-preprocess-after-radio-targets-hook)) 
(org-export-concatenate-multiline-links) (run-hooks (quote 
org-export-preprocess-before-normalizing-links-hook)) 
(org-export-normalize-links) ...) (and (buffer-name temp-buffer) (kill-buffer 
temp-buffer)))
  (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn 
(erase-buffer) (insert string) (setq case-fold-search t) (let 
((inhibit-read-only t)) (remove-text-properties (point-min) (point-max) (quote 
(read-only t)))) (org-export-kill-licensed-text) (let ((org-inhibit-startup t)) 
(org-mode)) (setq case-fold-search t) (org-clone-local-variables source-buffer 
"^\\(org-\\|orgtbl-\\)") (org-install-letbind) (run-hooks (quote 
org-export-preprocess-hook)) (untabify (point-min) (point-max)) 
(org-export-handle-include-files-recurse) (run-hooks (quote 
org-export-preprocess-after-include-files-hook)) 
(org-export-remove-archived-trees archived-trees) 
(org-export-remove-comment-blocks-and-subtrees) (org-export-handle-export-tags 
(plist-get parameters :select-tags) (plist-get parameters :exclude-tags)) 
(run-hooks (quote org-export-preprocess-after-tree-selection-hook)) 
(org-export-remove-tasks (plist-get parameters :tasks)) (if (plist-get 
parameters :footnotes) (progn (org-footnote-normalize nil parameters))) 
(org-export-mark-list-end) (org-export-preprocess-apply-macros) (run-hooks 
(quote org-export-preprocess-after-macros-hook)) (org-export-blocks-preprocess) 
(org-export-mark-list-properties) 
(org-export-replace-src-segments-and-examples) 
(org-export-protect-colon-examples) (org-export-convert-protected-spaces) (setq 
target-alist (org-export-define-heading-targets target-alist)) (run-hooks 
(quote org-export-preprocess-after-headline-targets-hook)) 
(org-export-remember-html-container-classes) 
(org-export-remove-or-extract-drawers drawers (plist-get parameters :drawers)) 
(if (plist-get parameters :skip-before-1st-heading) (progn (goto-char 
(point-min)) (if (re-search-forward "^\\(#.*\n\\)?\\*+[       ]" nil t) (progn 
(delete-region ... ...) (goto-char ...) (insert "\n"))))) (if (plist-get 
parameters :add-text) (progn (goto-char (point-min)) (insert (plist-get 
parameters :add-text) "\n"))) (org-export-remove-headline-metadata parameters) 
(setq target-alist (org-export-handle-invisible-targets target-alist)) 
(run-hooks (quote org-export-preprocess-before-selecting-backend-code-hook)) 
(org-export-select-backend-specific-text) (org-export-protect-quoted-subtrees) 
(org-export-remove-clock-lines) (org-export-protect-verbatim) 
(org-export-mark-blockquote-verse-center) (run-hooks (quote 
org-export-preprocess-after-blockquote-hook)) (if (plist-get parameters 
:timestamps) nil (org-export-remove-timestamps)) (setq target-alist 
(org-export-attach-captions-and-attributes target-alist)) 
(org-export-mark-radio-links) (run-hooks (quote 
org-export-preprocess-after-radio-targets-hook)) 
(org-export-concatenate-multiline-links) (run-hooks (quote 
org-export-preprocess-before-normalizing-links-hook)) 
(org-export-normalize-links) ...) (and (buffer-name temp-buffer) (kill-buffer 
temp-buffer))))
  (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer 
(set-buffer temp-buffer) (unwind-protect (progn (erase-buffer) (insert string) 
(setq case-fold-search t) (let ((inhibit-read-only t)) (remove-text-properties 
(point-min) (point-max) (quote (read-only t)))) (org-export-kill-licensed-text) 
(let ((org-inhibit-startup t)) (org-mode)) (setq case-fold-search t) 
(org-clone-local-variables source-buffer "^\\(org-\\|orgtbl-\\)") 
(org-install-letbind) (run-hooks (quote org-export-preprocess-hook)) (untabify 
(point-min) (point-max)) (org-export-handle-include-files-recurse) (run-hooks 
(quote org-export-preprocess-after-include-files-hook)) 
(org-export-remove-archived-trees archived-trees) 
(org-export-remove-comment-blocks-and-subtrees) (org-export-handle-export-tags 
(plist-get parameters :select-tags) (plist-get parameters :exclude-tags)) 
(run-hooks (quote org-export-preprocess-after-tree-selection-hook)) 
(org-export-remove-tasks (plist-get parameters :tasks)) (if (plist-get 
parameters :footnotes) (progn (org-footnote-normalize nil parameters))) 
(org-export-mark-list-end) (org-export-preprocess-apply-macros) (run-hooks 
(quote org-export-preprocess-after-macros-hook)) (org-export-blocks-preprocess) 
(org-export-mark-list-properties) 
(org-export-replace-src-segments-and-examples) 
(org-export-protect-colon-examples) (org-export-convert-protected-spaces) (setq 
target-alist (org-export-define-heading-targets target-alist)) (run-hooks 
(quote org-export-preprocess-after-headline-targets-hook)) 
(org-export-remember-html-container-classes) 
(org-export-remove-or-extract-drawers drawers (plist-get parameters :drawers)) 
(if (plist-get parameters :skip-before-1st-heading) (progn (goto-char 
(point-min)) (if (re-search-forward "^\\(#.*\n\\)?\\*+[  ]" nil t) (progn ... 
... ...)))) (if (plist-get parameters :add-text) (progn (goto-char (point-min)) 
(insert (plist-get parameters :add-text) "\n"))) 
(org-export-remove-headline-metadata parameters) (setq target-alist 
(org-export-handle-invisible-targets target-alist)) (run-hooks (quote 
org-export-preprocess-before-selecting-backend-code-hook)) 
(org-export-select-backend-specific-text) (org-export-protect-quoted-subtrees) 
(org-export-remove-clock-lines) (org-export-protect-verbatim) 
(org-export-mark-blockquote-verse-center) (run-hooks (quote 
org-export-preprocess-after-blockquote-hook)) (if (plist-get parameters 
:timestamps) nil (org-export-remove-timestamps)) (setq target-alist 
(org-export-attach-captions-and-attributes target-alist)) 
(org-export-mark-radio-links) (run-hooks (quote 
org-export-preprocess-after-radio-targets-hook)) 
(org-export-concatenate-multiline-links) (run-hooks (quote 
org-export-preprocess-before-normalizing-links-hook)) 
(org-export-normalize-links) ...) (and (buffer-name temp-buffer) (kill-buffer 
temp-buffer)))))
  (let* ((org-export-current-backend (or (plist-get parameters :for-backend) 
org-export-current-backend)) (archived-trees (plist-get parameters 
:archived-trees)) (inhibit-read-only t) (drawers org-drawers) (source-buffer 
(current-buffer)) target-alist rtn) (setq org-export-target-aliases nil 
org-export-preferred-target-alist nil org-export-id-target-alist nil 
org-export-code-refs nil) (let ((temp-buffer (generate-new-buffer " *temp*"))) 
(save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn 
(erase-buffer) (insert string) (setq case-fold-search t) (let 
((inhibit-read-only t)) (remove-text-properties (point-min) (point-max) (quote 
...))) (org-export-kill-licensed-text) (let ((org-inhibit-startup t)) 
(org-mode)) (setq case-fold-search t) (org-clone-local-variables source-buffer 
"^\\(org-\\|orgtbl-\\)") (org-install-letbind) (run-hooks (quote 
org-export-preprocess-hook)) (untabify (point-min) (point-max)) 
(org-export-handle-include-files-recurse) (run-hooks (quote 
org-export-preprocess-after-include-files-hook)) 
(org-export-remove-archived-trees archived-trees) 
(org-export-remove-comment-blocks-and-subtrees) (org-export-handle-export-tags 
(plist-get parameters :select-tags) (plist-get parameters :exclude-tags)) 
(run-hooks (quote org-export-preprocess-after-tree-selection-hook)) 
(org-export-remove-tasks (plist-get parameters :tasks)) (if (plist-get 
parameters :footnotes) (progn (org-footnote-normalize nil parameters))) 
(org-export-mark-list-end) (org-export-preprocess-apply-macros) (run-hooks 
(quote org-export-preprocess-after-macros-hook)) (org-export-blocks-preprocess) 
(org-export-mark-list-properties) 
(org-export-replace-src-segments-and-examples) 
(org-export-protect-colon-examples) (org-export-convert-protected-spaces) (setq 
target-alist (org-export-define-heading-targets target-alist)) (run-hooks 
(quote org-export-preprocess-after-headline-targets-hook)) 
(org-export-remember-html-container-classes) 
(org-export-remove-or-extract-drawers drawers (plist-get parameters :drawers)) 
(if (plist-get parameters :skip-before-1st-heading) (progn (goto-char ...) (if 
... ...))) (if (plist-get parameters :add-text) (progn (goto-char ...) (insert 
... "\n"))) (org-export-remove-headline-metadata parameters) (setq target-alist 
(org-export-handle-invisible-targets target-alist)) (run-hooks (quote 
org-export-preprocess-before-selecting-backend-code-hook)) 
(org-export-select-backend-specific-text) (org-export-protect-quoted-subtrees) 
(org-export-remove-clock-lines) (org-export-protect-verbatim) 
(org-export-mark-blockquote-verse-center) (run-hooks (quote 
org-export-preprocess-after-blockquote-hook)) (if (plist-get parameters 
:timestamps) nil (org-export-remove-timestamps)) (setq target-alist 
(org-export-attach-captions-and-attributes target-alist)) 
(org-export-mark-radio-links) (run-hooks (quote 
org-export-preprocess-after-radio-targets-hook)) 
(org-export-concatenate-multiline-links) (run-hooks (quote 
org-export-preprocess-before-normalizing-links-hook)) 
(org-export-normalize-links) ...) (and (buffer-name temp-buffer) (kill-buffer 
temp-buffer))))) rtn)
  org-export-preprocess-string("#+TITLE:     org-annotation-helper.el -- using 
org-mode as a bookmark manager, a knowledge base, a research tool and 
more!\n#+OPTIONS:   ^:{} author:nil\n#+STARTUP: odd\n\nWe want to be able to 
pass a URL, a document title and a selected\nregion directly from a web browser 
to a running instance of Emacs.\n\n* Oveview\n  You select a region on a web 
page, click a bookmarklet and a link to\n  the web page, page title and 
selected region is saved in a\n  designated Org file.\n\n* Components\n*** New 
protocols\nWe define a remember:// url handler in the browser and use a 
shell\nscript to handle the protocol.  This script passes the information to\na 
running Emacs process (using =emacsclient= or =gnuclient=).  We 
use\nbookmarklets to create the =remember://= urls dynamicly.\n\nThe protocol 
types currently recognized are:\n\n- remember:// :: start `remember' with the 
url and title filled in\n- annotation:// :: similar to 
`planner-annotation-as-kill' (org?)\n\nThe urls used internally will have the 
following form:\n\n  =remember://<the web page url>::remember::<the 
title>::remember::<selection>=\n\nThe title will be url-hex-encoded.\n\n*** The 
bookmarklets\n\n#+begin_src java\njavascript:location.href='remember://' + 
location.href + \\\n  '::remember::' + escape(document.title) + '::remember::' 
+ escape(window.getSelection())\n#+end_src\n\n#+begin_src 
java\njavascript:location.href='annotation://' + location.href + '::remember::' 
+\\\n    escape(document.title) ;;\n#+end_src\n\n*** The handler\n\n#+begin_src 
shell-script\n\n#!/bin/sh\n# org-annotation-helper -- pass a remember-url to 
emacs\n#\n# Author: Geert Kloosterman <address@hidden>\n# Date: Sat Nov 19 
22:33:18 2005\n\nif [ -z \"$1\" ]; then\n    echo \"$0: Error: no arguments 
given!\" 1>&2\n    exit 1\nfi\n\n# To test uncomment following line\n#echo $1 
>> /tmp/remember.out\n\nemacsclient --eval \"(progn (bzg/org-annotation-helper 
\\\"$1\\\" ) nil)\"\n#+end_src\n\n* Installation\n*** Install 
org-annotation-helper.el\n    \n    Install this script and require it in your 
.emacs (or wherever you\n    want to do it)\n\n#+begin_src emacs-lisp\n(require 
'org-annotation-helper)\n#+end_src\n\n*** Install the remember script\n***** 
Save the handler as a script, and make sure it is executable, i.e. 
remember\n***** Try it:\n      1. Make sure emacs is running and you have 
started its server\n         mode using (server-start) in .emacs or M-x 
server-start.\n\n      2. Run this command from the command 
line:\n\n#+begin_src shell-script\n$ remember 
'remember://http%3A//orgmode.org/::remember::Org-Mode%20Homepage::remember::Notes'\n#+end_src\n
      \n      3. Emacs should now show a remember window with a URL to 
remember.org\n\n*** Add two bookmarklets\n\n    For firefox:\n\n    1. Right 
click on the bookmarks area of Firefox.\n    2. Select new bookmark.\n    3. In 
location fill the javascript code above (the bookmarklet)\n    4. Make sure 
\"Load this bookmark in the sidebar is deselected\n\n    Try it. You should 
have now a url that starts with \"remember://\"\n     and your browser will not 
know what do to with it.\n\n*** Add the handler for the \"remember://\" 
URI\n\n***** Firefox\n\n      To add a protocol handler (eg: remember://) in 
Firefox, take the\n      following steps:\n\n      1. type in \"about:config\" 
in the location bar\n      2. right click, select New --> String\n         - 
the name should be \"network.protocol-handler.app.remember\"\n         - the 
value should be the executable, eg. \"org-annotation-helper\".\n\n     At least 
under Linux this does not need to be the full path to\n     the executable.\n\n 
    See http://kb.mozillazine.org/Register_protocol for more details.\n\n***** 
Opera\n\n      In Opera add the protocol in the 
Preferences->Advanced->Programs\n      dialog.\n\n*** Configure a template\n\n  
  I personally use the following template for this mode (all as one\n    
line):\n\n#+begin_example \n(\"Weblink\" ?w \"* %c\\n  :PROPERTIES:\\n  
:CREATED: %U\\n  :END:\\n  - link: %:link\\n  - Quote:\\n\\n    
%?%:region\\n\\n  - End Quote\\n\\n\" \"bookmarks.org\" \"WebLinks\" 
)\n#+end_example\n\n   - =%c= :: will be replaced with the hyperlink to the 
page, displaying the title of the page\n   - =%:link= :: will be replaced with 
the address of the page\n   - =%i= :: will be replaced with the selected text 
from the browser\n   - =%:region= :: will be replaced by the selected text from 
the web\n                   page (special characters will be in hex-code.)\n   
- =%U= :: will be replaced by the current date\n   - =%?= :: the cursor will be 
placed here (you may also replace this\n             escape with =%&= to make 
it completely non-interactive.)\n\n   By default the new remember notes are 
placed in the bookmarks.org\n   file under the \"Web links\" section, but it 
can be easily overriden\n   with C-u C-c C-c\n\n*** Step 5:\n     Enjoy\n" 
:emph-multiline t :for-backend html :skip-before-1st-heading nil :drawers nil 
:todo-keywords t :tasks t :tags not-in-toc :priority nil :footnotes t 
:timestamps nil :archived-trees nil :select-tags ("export") :exclude-tags 
("noexport") :add-text nil :LaTeX-fragments t)
\n]")
\n      ]*</p>" nil t) (replace-match "")) (goto-char (point-min)) (goto-char 
(point-min)) (let (beg end n) (while (setq beg (next-single-property-change 
(point) (quote org-whitespace))) (setq n (get-text-property beg (quote 
org-whitespace)) end (next-single-property-change beg (quote org-whitespace))) 
(goto-char beg) (delete-region beg end) (insert (format "<span 
style=\"visibility:hidden;\">%s</span>" (make-string n 120))))) (goto-char 
(point-min)) (if (looking-at "\\s-+\n") (progn (replace-match ""))) 
(remove-text-properties (point-min) (point-max) (quote (display t))) (run-hooks 
(quote org-export-html-final-hook)) (or to-buffer (save-buffer)) (goto-char 
(point-min)) (or (org-export-push-to-kill-ring "HTML") (message "Exporting... 
done")) (if (eq to-buffer (quote string)) (prog1 (buffer-substring (point-min) 
(point-max)) (kill-buffer (current-buffer))) (current-buffer))))
  org-export-as-html(nil (:buffer-will-be-killed t :base-directory 
"~/src/emacs/org/Worg/" :base-extension "org" :exclude 
"FIXME\\|revtex-sample.org" :makeindex t :auto-sitemap t :sitemap-ignore-case t 
:html-extension "html" :publishing-directory "/var/www/orgmode.org/worg/" 
:publishing-function (org-publish-org-to-html org-publish-org-to-org) 
:htmlized-source t :section-numbers nil :table-of-contents nil :style "<link 
rel=\"stylesheet\" title=\"Standard\" href=\"/worg/style/worg.css\" 
type=\"text/css\" />\n<link rel=\"alternate stylesheet\" title=\"Zenburn\" 
href=\"/worg/style/worg-zenburn.css\" type=\"text/css\" />\n<link 
rel=\"alternate stylesheet\" title=\"Classic\" 
href=\"/worg/style/worg-classic.css\" type=\"text/css\" />\n<link 
rel=\"stylesheet\" href=\"http://orgmode.org/css/lightbox.css\"; 
type=\"text/css\" media=\"screen\" />\n<link rel=\"SHORTCUT ICON\" 
href=\"/org-mode-unicorn.ico\" type=\"image/x-icon\"></link>\n<link 
rel=\"icon\" href=\"/org-mode-unicorn.ico\" type=\"image/ico\"></link>" 
:recursive t :auto-preamble t :postamble "<div id=\"license\"><p>Documentation 
from the http://orgmode.org/worg/ website (either in its HTML format or in its 
Org format) is licensed under the <a 
href=\"http://www.gnu.org/copyleft/fdl.html\";>GNU Free Documentation License 
version 1.3</a> or later.  The code examples are licensed under the <a 
href=\"http://www.gnu.org/licenses/gpl.html\";>GNU General Public License v3</a> 
or later.</p></div>" :auto-postamble nil) nil nil 
"/var/www/orgmode.org/worg/org-contrib/")
  funcall(org-export-as-html nil (:buffer-will-be-killed t :base-directory 
"~/src/emacs/org/Worg/" :base-extension "org" :exclude 
"FIXME\\|revtex-sample.org" :makeindex t :auto-sitemap t :sitemap-ignore-case t 
:html-extension "html" :publishing-directory "/var/www/orgmode.org/worg/" 
:publishing-function (org-publish-org-to-html org-publish-org-to-org) 
:htmlized-source t :section-numbers nil :table-of-contents nil :style "<link 
rel=\"stylesheet\" title=\"Standard\" href=\"/worg/style/worg.css\" 
type=\"text/css\" />\n<link rel=\"alternate stylesheet\" title=\"Zenburn\" 
href=\"/worg/style/worg-zenburn.css\" type=\"text/css\" />\n<link 
rel=\"alternate stylesheet\" title=\"Classic\" 
href=\"/worg/style/worg-classic.css\" type=\"text/css\" />\n<link 
rel=\"stylesheet\" href=\"http://orgmode.org/css/lightbox.css\"; 
type=\"text/css\" media=\"screen\" />\n<link rel=\"SHORTCUT ICON\" 
href=\"/org-mode-unicorn.ico\" type=\"image/x-icon\"></link>\n<link 
rel=\"icon\" href=\"/org-mode-unicorn.ico\" type=\"image/ico\"></link>" 
:recursive t :auto-preamble t :postamble "<div id=\"license\"><p>Documentation 
from the http://orgmode.org/worg/ website (either in its HTML format or in its 
Org format) is licensed under the <a 
href=\"http://www.gnu.org/copyleft/fdl.html\";>GNU Free Documentation License 
version 1.3</a> or later.  The code examples are licensed under the <a 
href=\"http://www.gnu.org/licenses/gpl.html\";>GNU General Public License v3</a> 
or later.</p></div>" :auto-postamble nil) nil nil 
"/var/www/orgmode.org/worg/org-contrib/")
  (setq export-buf-or-file (funcall (intern (concat "org-export-as-" format)) 
(plist-get plist :headline-levels) plist nil (plist-get plist :body-only) 
pub-dir))
  (let* ((plist (cons :buffer-will-be-killed (cons t plist))) (init-buf 
(current-buffer)) (init-point (point)) (init-buf-string (buffer-string)) 
export-buf-or-file) (run-hooks (quote org-publish-before-export-hook)) (setq 
export-buf-or-file (funcall (intern (concat "org-export-as-" format)) 
(plist-get plist :headline-levels) plist nil (plist-get plist :body-only) 
pub-dir)) (if (and (bufferp export-buf-or-file) (buffer-live-p 
export-buf-or-file)) (progn (set-buffer export-buf-or-file) (progn (run-hooks 
(quote org-publish-after-export-hook)) (if (buffer-modified-p) (save-buffer))) 
(kill-buffer export-buf-or-file))) (set-buffer init-buf) (if (buffer-modified-p 
init-buf) (progn (erase-buffer) (insert init-buf-string) (save-buffer) 
(goto-char init-point))) (if visiting nil (kill-buffer init-buf)))
  (save-excursion (org-pop-to-buffer-same-window (or visiting (find-file 
filename))) (let* ((plist (cons :buffer-will-be-killed (cons t plist))) 
(init-buf (current-buffer)) (init-point (point)) (init-buf-string 
(buffer-string)) export-buf-or-file) (run-hooks (quote 
org-publish-before-export-hook)) (setq export-buf-or-file (funcall (intern 
(concat "org-export-as-" format)) (plist-get plist :headline-levels) plist nil 
(plist-get plist :body-only) pub-dir)) (if (and (bufferp export-buf-or-file) 
(buffer-live-p export-buf-or-file)) (progn (set-buffer export-buf-or-file) 
(progn (run-hooks (quote org-publish-after-export-hook)) (if 
(buffer-modified-p) (save-buffer))) (kill-buffer export-buf-or-file))) 
(set-buffer init-buf) (if (buffer-modified-p init-buf) (progn (erase-buffer) 
(insert init-buf-string) (save-buffer) (goto-char init-point))) (if visiting 
nil (kill-buffer init-buf))))
  (let ((visiting (find-buffer-visiting filename))) (save-excursion 
(org-pop-to-buffer-same-window (or visiting (find-file filename))) (let* 
((plist (cons :buffer-will-be-killed (cons t plist))) (init-buf 
(current-buffer)) (init-point (point)) (init-buf-string (buffer-string)) 
export-buf-or-file) (run-hooks (quote org-publish-before-export-hook)) (setq 
export-buf-or-file (funcall (intern (concat "org-export-as-" format)) 
(plist-get plist :headline-levels) plist nil (plist-get plist :body-only) 
pub-dir)) (if (and (bufferp export-buf-or-file) (buffer-live-p 
export-buf-or-file)) (progn (set-buffer export-buf-or-file) (progn (run-hooks 
(quote org-publish-after-export-hook)) (if (buffer-modified-p) (save-buffer))) 
(kill-buffer export-buf-or-file))) (set-buffer init-buf) (if (buffer-modified-p 
init-buf) (progn (erase-buffer) (insert init-buf-string) (save-buffer) 
(goto-char init-point))) (if visiting nil (kill-buffer init-buf)))))
  org-publish-org-to("html" (:base-directory "~/src/emacs/org/Worg/" 
:base-extension "org" :exclude "FIXME\\|revtex-sample.org" :makeindex t 
:auto-sitemap t :sitemap-ignore-case t :html-extension "html" 
:publishing-directory "/var/www/orgmode.org/worg/" :publishing-function 
(org-publish-org-to-html org-publish-org-to-org) :htmlized-source t 
:section-numbers nil :table-of-contents nil :style "<link rel=\"stylesheet\" 
title=\"Standard\" href=\"/worg/style/worg.css\" type=\"text/css\" />\n<link 
rel=\"alternate stylesheet\" title=\"Zenburn\" 
href=\"/worg/style/worg-zenburn.css\" type=\"text/css\" />\n<link 
rel=\"alternate stylesheet\" title=\"Classic\" 
href=\"/worg/style/worg-classic.css\" type=\"text/css\" />\n<link 
rel=\"stylesheet\" href=\"http://orgmode.org/css/lightbox.css\"; 
type=\"text/css\" media=\"screen\" />\n<link rel=\"SHORTCUT ICON\" 
href=\"/org-mode-unicorn.ico\" type=\"image/x-icon\"></link>\n<link 
rel=\"icon\" href=\"/org-mode-unicorn.ico\" type=\"image/ico\"></link>" 
:recursive t :auto-preamble t :postamble "<div id=\"license\"><p>Documentation 
from the http://orgmode.org/worg/ website (either in its HTML format or in its 
Org format) is licensed under the <a 
href=\"http://www.gnu.org/copyleft/fdl.html\";>GNU Free Documentation License 
version 1.3</a> or later.  The code examples are licensed under the <a 
href=\"http://www.gnu.org/licenses/gpl.html\";>GNU General Public License v3</a> 
or later.</p></div>" :auto-postamble nil) 
"/home/nick/src/emacs/org/Worg/org-contrib/org-annotation-helper.org" 
"/var/www/orgmode.org/worg/org-contrib/")
  (let ((org-export-preprocess-after-headline-targets-hook (if (plist-get 
project-plist :makeindex) (cons (quote org-publish-aux-preprocess) 
org-export-preprocess-after-headline-targets-hook) 
org-export-preprocess-after-headline-targets-hook))) (org-publish-org-to "html" 
plist filename pub-dir))
  org-publish-org-to-html((:base-directory "~/src/emacs/org/Worg/" 
:base-extension "org" :exclude "FIXME\\|revtex-sample.org" :makeindex t 
:auto-sitemap t :sitemap-ignore-case t :html-extension "html" 
:publishing-directory "/var/www/orgmode.org/worg/" :publishing-function 
(org-publish-org-to-html org-publish-org-to-org) :htmlized-source t 
:section-numbers nil :table-of-contents nil :style "<link rel=\"stylesheet\" 
title=\"Standard\" href=\"/worg/style/worg.css\" type=\"text/css\" />\n<link 
rel=\"alternate stylesheet\" title=\"Zenburn\" 
href=\"/worg/style/worg-zenburn.css\" type=\"text/css\" />\n<link 
rel=\"alternate stylesheet\" title=\"Classic\" 
href=\"/worg/style/worg-classic.css\" type=\"text/css\" />\n<link 
rel=\"stylesheet\" href=\"http://orgmode.org/css/lightbox.css\"; 
type=\"text/css\" media=\"screen\" />\n<link rel=\"SHORTCUT ICON\" 
href=\"/org-mode-unicorn.ico\" type=\"image/x-icon\"></link>\n<link 
rel=\"icon\" href=\"/org-mode-unicorn.ico\" type=\"image/ico\"></link>" 
:recursive t :auto-preamble t :postamble "<div id=\"license\"><p>Documentation 
from the http://orgmode.org/worg/ website (either in its HTML format or in its 
Org format) is licensed under the <a 
href=\"http://www.gnu.org/copyleft/fdl.html\";>GNU Free Documentation License 
version 1.3</a> or later.  The code examples are licensed under the <a 
href=\"http://www.gnu.org/licenses/gpl.html\";>GNU General Public License v3</a> 
or later.</p></div>" :auto-postamble nil) 
"/home/nick/src/emacs/org/Worg/org-contrib/org-annotation-helper.org" 
"/var/www/orgmode.org/worg/org-contrib/")
  funcall(org-publish-org-to-html (:base-directory "~/src/emacs/org/Worg/" 
:base-extension "org" :exclude "FIXME\\|revtex-sample.org" :makeindex t 
:auto-sitemap t :sitemap-ignore-case t :html-extension "html" 
:publishing-directory "/var/www/orgmode.org/worg/" :publishing-function 
(org-publish-org-to-html org-publish-org-to-org) :htmlized-source t 
:section-numbers nil :table-of-contents nil :style "<link rel=\"stylesheet\" 
title=\"Standard\" href=\"/worg/style/worg.css\" type=\"text/css\" />\n<link 
rel=\"alternate stylesheet\" title=\"Zenburn\" 
href=\"/worg/style/worg-zenburn.css\" type=\"text/css\" />\n<link 
rel=\"alternate stylesheet\" title=\"Classic\" 
href=\"/worg/style/worg-classic.css\" type=\"text/css\" />\n<link 
rel=\"stylesheet\" href=\"http://orgmode.org/css/lightbox.css\"; 
type=\"text/css\" media=\"screen\" />\n<link rel=\"SHORTCUT ICON\" 
href=\"/org-mode-unicorn.ico\" type=\"image/x-icon\"></link>\n<link 
rel=\"icon\" href=\"/org-mode-unicorn.ico\" type=\"image/ico\"></link>" 
:recursive t :auto-preamble t :postamble "<div id=\"license\"><p>Documentation 
from the http://orgmode.org/worg/ website (either in its HTML format or in its 
Org format) is licensed under the <a 
href=\"http://www.gnu.org/copyleft/fdl.html\";>GNU Free Documentation License 
version 1.3</a> or later.  The code examples are licensed under the <a 
href=\"http://www.gnu.org/licenses/gpl.html\";>GNU General Public License v3</a> 
or later.</p></div>" :auto-postamble nil) 
"/home/nick/src/emacs/org/Worg/org-contrib/org-annotation-helper.org" 
"/var/www/orgmode.org/worg/org-contrib/")
  (progn (funcall f project-plist filename tmp-pub-dir) 
(org-publish-update-timestamp filename pub-dir f base-dir))
  (if (org-publish-needed-p filename pub-dir f tmp-pub-dir base-dir) (progn 
(funcall f project-plist filename tmp-pub-dir) (org-publish-update-timestamp 
filename pub-dir f base-dir)))
  (lambda (f) (if (org-publish-needed-p filename pub-dir f tmp-pub-dir 
base-dir) (progn (funcall f project-plist filename tmp-pub-dir) 
(org-publish-update-timestamp filename pub-dir f 
base-dir))))(org-publish-org-to-html)
  mapc((lambda (f) (if (org-publish-needed-p filename pub-dir f tmp-pub-dir 
base-dir) (progn (funcall f project-plist filename tmp-pub-dir) 
(org-publish-update-timestamp filename pub-dir f base-dir)))) 
(org-publish-org-to-html org-publish-org-to-org))
  (if (listp publishing-function) (mapc (function (lambda (f) (if 
(org-publish-needed-p filename pub-dir f tmp-pub-dir base-dir) (progn (funcall 
f project-plist filename tmp-pub-dir) (org-publish-update-timestamp filename 
pub-dir f base-dir))))) publishing-function) (if (org-publish-needed-p filename 
pub-dir publishing-function tmp-pub-dir base-dir) (progn (funcall 
publishing-function project-plist filename tmp-pub-dir) 
(org-publish-update-timestamp filename pub-dir publishing-function base-dir))))
  (let* ((project (or project (or (org-publish-get-project-from-filename 
filename) (error "File %s not part of any known project" (abbreviate-file-name 
filename))))) (project-plist (cdr project)) (ftname (expand-file-name 
filename)) (publishing-function (or (plist-get project-plist 
:publishing-function) (quote org-publish-org-to-html))) (base-dir 
(file-name-as-directory (expand-file-name (or (plist-get project-plist 
:base-directory) (error "Project %s does not have :base-directory defined" (car 
project)))))) (pub-dir (file-name-as-directory (file-truename (or (eval 
(plist-get project-plist :publishing-directory)) (error "Project %s does not 
have :publishing-directory defined" (car project)))))) tmp-pub-dir) (if 
no-cache nil (org-publish-initialize-cache (car project))) (setq tmp-pub-dir 
(file-name-directory (concat pub-dir (and (string-match (regexp-quote base-dir) 
ftname) (substring ftname (match-end 0)))))) (if (listp publishing-function) 
(mapc (function (lambda (f) (if (org-publish-needed-p filename pub-dir f 
tmp-pub-dir base-dir) (progn (funcall f project-plist filename tmp-pub-dir) 
(org-publish-update-timestamp filename pub-dir f base-dir))))) 
publishing-function) (if (org-publish-needed-p filename pub-dir 
publishing-function tmp-pub-dir base-dir) (progn (funcall publishing-function 
project-plist filename tmp-pub-dir) (org-publish-update-timestamp filename 
pub-dir publishing-function base-dir)))) (if no-cache nil 
(org-publish-write-cache-file)))
  
org-publish-file("/home/nick/src/emacs/org/Worg/org-contrib/org-annotation-helper.org"
 ("worg-pages" :base-directory "~/src/emacs/org/Worg/" :base-extension "org" 
:exclude "FIXME\\|revtex-sample.org" :makeindex t :auto-sitemap t 
:sitemap-ignore-case t :html-extension "html" :publishing-directory 
"/var/www/orgmode.org/worg/" :publishing-function (org-publish-org-to-html 
org-publish-org-to-org) :htmlized-source t :section-numbers nil 
:table-of-contents nil :style "<link rel=\"stylesheet\" title=\"Standard\" 
href=\"/worg/style/worg.css\" type=\"text/css\" />\n<link rel=\"alternate 
stylesheet\" title=\"Zenburn\" href=\"/worg/style/worg-zenburn.css\" 
type=\"text/css\" />\n<link rel=\"alternate stylesheet\" title=\"Classic\" 
href=\"/worg/style/worg-classic.css\" type=\"text/css\" />\n<link 
rel=\"stylesheet\" href=\"http://orgmode.org/css/lightbox.css\"; 
type=\"text/css\" media=\"screen\" />\n<link rel=\"SHORTCUT ICON\" 
href=\"/org-mode-unicorn.ico\" type=\"image/x-icon\"></link>\n<link 
rel=\"icon\" href=\"/org-mode-unicorn.ico\" type=\"image/ico\"></link>" 
:recursive t :auto-preamble t :postamble "<div id=\"license\"><p>Documentation 
from the http://orgmode.org/worg/ website (either in its HTML format or in its 
Org format) is licensed under the <a 
href=\"http://www.gnu.org/copyleft/fdl.html\";>GNU Free Documentation License 
version 1.3</a> or later.  The code examples are licensed under the <a 
href=\"http://www.gnu.org/licenses/gpl.html\";>GNU General Public License v3</a> 
or later.</p></div>" :auto-postamble nil) t)
  (while (setq file (car (prog1 files (setq files (cdr files))))) 
(org-publish-file file project t))
  (let* ((project-plist (cdr project)) (exclude-regexp (plist-get project-plist 
:exclude)) (sitemap-p (plist-get project-plist :auto-sitemap)) 
(sitemap-filename (or (plist-get project-plist :sitemap-filename) 
"sitemap.org")) (sitemap-function (or (plist-get project-plist 
:sitemap-function) (quote org-publish-org-sitemap))) (org-sitemap-date-format 
(or (plist-get project-plist :sitemap-date-format) 
org-publish-sitemap-date-format)) (org-sitemap-file-entry-format (or (plist-get 
project-plist :sitemap-file-entry-format) 
org-publish-sitemap-file-entry-format)) (preparation-function (plist-get 
project-plist :preparation-function)) (completion-function (plist-get 
project-plist :completion-function)) (files (org-publish-get-base-files project 
exclude-regexp)) file) (if preparation-function (progn (run-hooks (quote 
preparation-function)))) (if sitemap-p (funcall sitemap-function project 
sitemap-filename)) (while (setq file (car (prog1 files (setq files (cdr 
files))))) (org-publish-file file project t)) (if (plist-get project-plist 
:makeindex) (progn (org-publish-index-generate-theindex (plist-get 
project-plist :base-directory)) (org-publish-file (expand-file-name 
"theindex.org" (plist-get project-plist :base-directory)) project t))) (if 
completion-function (progn (run-hooks (quote completion-function)))) 
(org-publish-write-cache-file))
  (lambda (project) (org-publish-initialize-cache (car project)) (let* 
((project-plist (cdr project)) (exclude-regexp (plist-get project-plist 
:exclude)) (sitemap-p (plist-get project-plist :auto-sitemap)) 
(sitemap-filename (or (plist-get project-plist :sitemap-filename) 
"sitemap.org")) (sitemap-function (or (plist-get project-plist 
:sitemap-function) (quote org-publish-org-sitemap))) (org-sitemap-date-format 
(or (plist-get project-plist :sitemap-date-format) 
org-publish-sitemap-date-format)) (org-sitemap-file-entry-format (or (plist-get 
project-plist :sitemap-file-entry-format) 
org-publish-sitemap-file-entry-format)) (preparation-function (plist-get 
project-plist :preparation-function)) (completion-function (plist-get 
project-plist :completion-function)) (files (org-publish-get-base-files project 
exclude-regexp)) file) (if preparation-function (progn (run-hooks (quote 
preparation-function)))) (if sitemap-p (funcall sitemap-function project 
sitemap-filename)) (while (setq file (car (prog1 files (setq files (cdr 
files))))) (org-publish-file file project t)) (if (plist-get project-plist 
:makeindex) (progn (org-publish-index-generate-theindex (plist-get 
project-plist :base-directory)) (org-publish-file (expand-file-name 
"theindex.org" (plist-get project-plist :base-directory)) project t))) (if 
completion-function (progn (run-hooks (quote completion-function)))) 
(org-publish-write-cache-file)))(("worg-pages" :base-directory 
"~/src/emacs/org/Worg/" :base-extension "org" :exclude 
"FIXME\\|revtex-sample.org" :makeindex t :auto-sitemap t :sitemap-ignore-case t 
:html-extension "html" :publishing-directory "/var/www/orgmode.org/worg/" 
:publishing-function (org-publish-org-to-html org-publish-org-to-org) 
:htmlized-source t :section-numbers nil :table-of-contents nil :style "<link 
rel=\"stylesheet\" title=\"Standard\" href=\"/worg/style/worg.css\" 
type=\"text/css\" />\n<link rel=\"alternate stylesheet\" title=\"Zenburn\" 
href=\"/worg/style/worg-zenburn.css\" type=\"text/css\" />\n<link 
rel=\"alternate stylesheet\" title=\"Classic\" 
href=\"/worg/style/worg-classic.css\" type=\"text/css\" />\n<link 
rel=\"stylesheet\" href=\"http://orgmode.org/css/lightbox.css\"; 
type=\"text/css\" media=\"screen\" />\n<link rel=\"SHORTCUT ICON\" 
href=\"/org-mode-unicorn.ico\" type=\"image/x-icon\"></link>\n<link 
rel=\"icon\" href=\"/org-mode-unicorn.ico\" type=\"image/ico\"></link>" 
:recursive t :auto-preamble t :postamble "<div id=\"license\"><p>Documentation 
from the http://orgmode.org/worg/ website (either in its HTML format or in its 
Org format) is licensed under the <a 
href=\"http://www.gnu.org/copyleft/fdl.html\";>GNU Free Documentation License 
version 1.3</a> or later.  The code examples are licensed under the <a 
href=\"http://www.gnu.org/licenses/gpl.html\";>GNU General Public License v3</a> 
or later.</p></div>" :auto-postamble nil))
  mapc((lambda (project) (org-publish-initialize-cache (car project)) (let* 
((project-plist (cdr project)) (exclude-regexp (plist-get project-plist 
:exclude)) (sitemap-p (plist-get project-plist :auto-sitemap)) 
(sitemap-filename (or (plist-get project-plist :sitemap-filename) 
"sitemap.org")) (sitemap-function (or (plist-get project-plist 
:sitemap-function) (quote org-publish-org-sitemap))) (org-sitemap-date-format 
(or (plist-get project-plist :sitemap-date-format) 
org-publish-sitemap-date-format)) (org-sitemap-file-entry-format (or (plist-get 
project-plist :sitemap-file-entry-format) 
org-publish-sitemap-file-entry-format)) (preparation-function (plist-get 
project-plist :preparation-function)) (completion-function (plist-get 
project-plist :completion-function)) (files (org-publish-get-base-files project 
exclude-regexp)) file) (if preparation-function (progn (run-hooks (quote 
preparation-function)))) (if sitemap-p (funcall sitemap-function project 
sitemap-filename)) (while (setq file (car (prog1 files (setq files (cdr 
files))))) (org-publish-file file project t)) (if (plist-get project-plist 
:makeindex) (progn (org-publish-index-generate-theindex (plist-get 
project-plist :base-directory)) (org-publish-file (expand-file-name 
"theindex.org" (plist-get project-plist :base-directory)) project t))) (if 
completion-function (progn (run-hooks (quote completion-function)))) 
(org-publish-write-cache-file))) (("worg-org-faq" :base-directory 
"~/src/emacs/org/Worg/" :base-extension "dummy" :include ("org-faq.org") 
:html-extension "html" :publishing-directory "/var/www/orgmode.org/worg/" 
:publishing-function org-publish-org-to-html :section-numbers nil 
:table-of-contents nil :style "<link rel=\"stylesheet\" title=\"Standard\" 
href=\"/worg/style/worg.css\" type=\"text/css\" />\n<link rel=\"alternate 
stylesheet\" title=\"Zenburn\" href=\"/worg/style/worg-zenburn.css\" 
type=\"text/css\" />\n<link rel=\"alternate stylesheet\" title=\"Classic\" 
href=\"/worg/style/worg-classic.css\" type=\"text/css\" />\n<link 
rel=\"stylesheet\" href=\"http://orgmode.org/css/lightbox.css\"; 
type=\"text/css\" media=\"screen\" />\n<link rel=\"SHORTCUT ICON\" 
href=\"/org-mode-unicorn.ico\" type=\"image/x-icon\"></link>\n<link 
rel=\"icon\" href=\"/org-mode-unicorn.ico\" type=\"image/ico\"></link>" 
:recursive t :auto-preamble t :postamble "<div id=\"license\"><p>Documentation 
from the http://orgmode.org/worg/ website (either in its HTML format or in its 
Org format) is licensed under the <a 
href=\"http://www.gnu.org/copyleft/fdl.html\";>GNU Free Documentation License 
version 1.3</a> or later.  The code examples are licensed under the <a 
href=\"http://www.gnu.org/licenses/gpl.html\";>GNU General Public License v3</a> 
or later.</p></div>" :auto-postamble nil) ("worg-pages" :base-directory 
"~/src/emacs/org/Worg/" :base-extension "org" :exclude 
"FIXME\\|revtex-sample.org" :makeindex t :auto-sitemap t :sitemap-ignore-case t 
:html-extension "html" :publishing-directory "/var/www/orgmode.org/worg/" 
:publishing-function (org-publish-org-to-html org-publish-org-to-org) 
:htmlized-source t :section-numbers nil :table-of-contents nil :style "<link 
rel=\"stylesheet\" title=\"Standard\" href=\"/worg/style/worg.css\" 
type=\"text/css\" />\n<link rel=\"alternate stylesheet\" title=\"Zenburn\" 
href=\"/worg/style/worg-zenburn.css\" type=\"text/css\" />\n<link 
rel=\"alternate stylesheet\" title=\"Classic\" 
href=\"/worg/style/worg-classic.css\" type=\"text/css\" />\n<link 
rel=\"stylesheet\" href=\"http://orgmode.org/css/lightbox.css\"; 
type=\"text/css\" media=\"screen\" />\n<link rel=\"SHORTCUT ICON\" 
href=\"/org-mode-unicorn.ico\" type=\"image/x-icon\"></link>\n<link 
rel=\"icon\" href=\"/org-mode-unicorn.ico\" type=\"image/ico\"></link>" 
:recursive t :auto-preamble t :postamble "<div id=\"license\"><p>Documentation 
from the http://orgmode.org/worg/ website (either in its HTML format or in its 
Org format) is licensed under the <a 
href=\"http://www.gnu.org/copyleft/fdl.html\";>GNU Free Documentation License 
version 1.3</a> or later.  The code examples are licensed under the <a 
href=\"http://www.gnu.org/licenses/gpl.html\";>GNU General Public License v3</a> 
or later.</p></div>" :auto-postamble nil) ("worg-code" :base-directory 
"~/src/emacs/org/Worg/code/" :base-extension 
"html\\|css\\|png\\|js\\|bz2\\|el\\|sty\\|awk" :html-extension "html" 
:publishing-directory "/var/www/orgmode.org/worg/code/" :recursive t 
:publishing-function org-publish-attachment) ("worg-color-themes" 
:base-directory "~/src/emacs/org/Worg/color-themes/" :base-extension "el" 
:html-extension "html" :publishing-directory 
"/var/www/orgmode.org/worg/color-themes/" :recursive t :publishing-function 
org-publish-attachment) ("worg-images-dir" :base-directory 
"~/src/emacs/org/Worg/images/" :base-extension 
"png\\|jpg\\|gif\\|pdf\\|cvs\\|css" :publishing-directory 
"/var/www/orgmode.org/worg/images/" :recursive t :publishing-function 
org-publish-attachment) ("worg-images" :base-directory "~/src/emacs/org/Worg/" 
:base-extension "png\\|jpg\\|gif\\|pdf\\|csv\\|css" :publishing-directory 
"/var/www/orgmode.org/worg/" :recursive t :publishing-function 
org-publish-attachment) ("worg-sources" :base-directory "~/src/emacs/org/Worg/" 
:base-extension "org" :publishing-directory 
"/var/www/orgmode.org/worg/sources/" :recursive t :publishing-function 
org-publish-attachment) ("worg-extra" :base-directory "~/src/emacs/org/Worg/" 
:base-extension "css" :publishing-directory "/var/www/orgmode.org/worg/" 
:publishing-function org-publish-attachment)))
  org-publish-projects((("worg" :components ("worg-org-faq" "worg-pages" 
"worg-code" "worg-color-themes" "worg-images-dir" "worg-images" "worg-sources" 
"worg-extra")) ("orgweb" :components ("orgwebpages" "orgweb-extra")) 
("worg-org-faq" :base-directory "~/src/emacs/org/Worg/" :base-extension "dummy" 
:include ("org-faq.org") :html-extension "html" :publishing-directory 
"/var/www/orgmode.org/worg/" :publishing-function org-publish-org-to-html 
:section-numbers nil :table-of-contents nil :style "<link rel=\"stylesheet\" 
title=\"Standard\" href=\"/worg/style/worg.css\" type=\"text/css\" />\n<link 
rel=\"alternate stylesheet\" title=\"Zenburn\" 
href=\"/worg/style/worg-zenburn.css\" type=\"text/css\" />\n<link 
rel=\"alternate stylesheet\" title=\"Classic\" 
href=\"/worg/style/worg-classic.css\" type=\"text/css\" />\n<link 
rel=\"stylesheet\" href=\"http://orgmode.org/css/lightbox.css\"; 
type=\"text/css\" media=\"screen\" />\n<link rel=\"SHORTCUT ICON\" 
href=\"/org-mode-unicorn.ico\" type=\"image/x-icon\"></link>\n<link 
rel=\"icon\" href=\"/org-mode-unicorn.ico\" type=\"image/ico\"></link>" 
:recursive t :auto-preamble t :postamble "<div id=\"license\"><p>Documentation 
from the http://orgmode.org/worg/ website (either in its HTML format or in its 
Org format) is licensed under the <a 
href=\"http://www.gnu.org/copyleft/fdl.html\";>GNU Free Documentation License 
version 1.3</a> or later.  The code examples are licensed under the <a 
href=\"http://www.gnu.org/licenses/gpl.html\";>GNU General Public License v3</a> 
or later.</p></div>" :auto-postamble nil) ("worg-pages" :base-directory 
"~/src/emacs/org/Worg/" :base-extension "org" :exclude 
"FIXME\\|revtex-sample.org" :makeindex t :auto-sitemap t :sitemap-ignore-case t 
:html-extension "html" :publishing-directory "/var/www/orgmode.org/worg/" 
:publishing-function (org-publish-org-to-html org-publish-org-to-org) 
:htmlized-source t :section-numbers nil :table-of-contents nil :style "<link 
rel=\"stylesheet\" title=\"Standard\" href=\"/worg/style/worg.css\" 
type=\"text/css\" />\n<link rel=\"alternate stylesheet\" title=\"Zenburn\" 
href=\"/worg/style/worg-zenburn.css\" type=\"text/css\" />\n<link 
rel=\"alternate stylesheet\" title=\"Classic\" 
href=\"/worg/style/worg-classic.css\" type=\"text/css\" />\n<link 
rel=\"stylesheet\" href=\"http://orgmode.org/css/lightbox.css\"; 
type=\"text/css\" media=\"screen\" />\n<link rel=\"SHORTCUT ICON\" 
href=\"/org-mode-unicorn.ico\" type=\"image/x-icon\"></link>\n<link 
rel=\"icon\" href=\"/org-mode-unicorn.ico\" type=\"image/ico\"></link>" 
:recursive t :auto-preamble t :postamble "<div id=\"license\"><p>Documentation 
from the http://orgmode.org/worg/ website (either in its HTML format or in its 
Org format) is licensed under the <a 
href=\"http://www.gnu.org/copyleft/fdl.html\";>GNU Free Documentation License 
version 1.3</a> or later.  The code examples are licensed under the <a 
href=\"http://www.gnu.org/licenses/gpl.html\";>GNU General Public License v3</a> 
or later.</p></div>" :auto-postamble nil) ("worg-code" :base-directory 
"~/src/emacs/org/Worg/code/" :base-extension 
"html\\|css\\|png\\|js\\|bz2\\|el\\|sty\\|awk" :html-extension "html" 
:publishing-directory "/var/www/orgmode.org/worg/code/" :recursive t 
:publishing-function org-publish-attachment) ("worg-color-themes" 
:base-directory "~/src/emacs/org/Worg/color-themes/" :base-extension "el" 
:html-extension "html" :publishing-directory 
"/var/www/orgmode.org/worg/color-themes/" :recursive t :publishing-function 
org-publish-attachment) ("worg-images-dir" :base-directory 
"~/src/emacs/org/Worg/images/" :base-extension 
"png\\|jpg\\|gif\\|pdf\\|cvs\\|css" :publishing-directory 
"/var/www/orgmode.org/worg/images/" :recursive t :publishing-function 
org-publish-attachment) ("worg-images" :base-directory "~/src/emacs/org/Worg/" 
:base-extension "png\\|jpg\\|gif\\|pdf\\|csv\\|css" :publishing-directory 
"/var/www/orgmode.org/worg/" :recursive t :publishing-function 
org-publish-attachment) ("worg-sources" :base-directory "~/src/emacs/org/Worg/" 
:base-extension "org" :publishing-directory 
"/var/www/orgmode.org/worg/sources/" :recursive t :publishing-function 
org-publish-attachment) ("worg-extra" :base-directory "~/src/emacs/org/Worg/" 
:base-extension "css" :publishing-directory "/var/www/orgmode.org/worg/" 
:publishing-function org-publish-attachment)))
  (let ((org-publish-use-timestamps-flag (if force nil 
org-publish-use-timestamps-flag))) (org-publish-projects 
org-publish-project-alist))
  (progn (let ((org-publish-use-timestamps-flag (if force nil 
org-publish-use-timestamps-flag))) (org-publish-projects 
org-publish-project-alist)))
  (unwind-protect (progn (let ((org-publish-use-timestamps-flag (if force nil 
org-publish-use-timestamps-flag))) (org-publish-projects 
org-publish-project-alist))) (set-window-configuration wconfig))
  (let ((wconfig (current-window-configuration))) (unwind-protect (progn (let 
((org-publish-use-timestamps-flag (if force nil 
org-publish-use-timestamps-flag))) (org-publish-projects 
org-publish-project-alist))) (set-window-configuration wconfig)))
  org-publish-all()
  eval((org-publish-all))
  command-line-1(("-l" "/home/nick/.emacs.worg" "--eval" "(org-publish-all)"))
  command-line()
  normal-top-level()

reply via email to

[Prev in Thread] Current Thread [Next in Thread]