Worg publishing issue

Worg publishing issue

[Suvayu Ali]

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/13@07:01:27

Any ideas?

-- 
Suvayu

Open source is the future. It sets us free.

Re: Worg publishing issue

[Nick Dokos]

[-- Attachment #1: Type: text/plain, Size: 1530 bytes --]

Suvayu Ali <fatkasuvayu+linux@gmail.com> 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/13@07: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



[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: Local batch work publish - backtrace --]
[-- Type: text/x-lisp, Size: 50823 bytes --]

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 <g.j.kloosterman@gmail.com>\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()

Re: Worg publishing issue

[Bastien]

Hi Suvayu,

Suvayu Ali <fatkasuvayu+linux@gmail.com> writes:

> 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>

Thanks for this!

> But I see that it is not being published.  

I just published it:
http://orgmode.org/worg/org-tutorials/org-beamer/org-e-beamer.html

> 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/13@07:01:27
>
> Any ideas?

2 problems, a trivial one and a let's-prepare-for-headache one:

1. `org-publish-org-to-html' does not exist in the new export/publish
    libraries -- Nicolas, would that be enough to have aliases here
    (from org-publish-org-to-html to org-html-publish-to-html)?  I
    guess many people rely on thse org-publish-org-to* functions.

2. Worg is published using the maint branch of org-mode.git.  Which
   means that neither the new exporter nor the new way of escaping Org
   syntax in src code blocks are available...

   My guess is that your file org-e-beamer.org uses the new syntax for
   src code blocks -- I had to use the org-mode.git *master* branch to
   publish it correctly.

   We will need to update each begin_src block in Worg in order to use
   a recent org-mode.git for publishing.

Here you go,

-- 
 Bastien

Re: Worg publishing issue

[Suvayu Ali]

Hi Bastien,

On Thu, Feb 07, 2013 at 09:42:15AM +0100, Bastien wrote:
> 
> > But I see that it is not being published.  
> 
> I just published it:
> http://orgmode.org/worg/org-tutorials/org-beamer/org-e-beamer.html
> 

Thanks!

> > 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/13@07:01:27
> >
> > Any ideas?
> 
> 2 problems, a trivial one and a let's-prepare-for-headache one:
> 
> 1. `org-publish-org-to-html' does not exist in the new export/publish
>     libraries -- Nicolas, would that be enough to have aliases here
>     (from org-publish-org-to-html to org-html-publish-to-html)?  I
>     guess many people rely on thse org-publish-org-to* functions.
> 
> 2. Worg is published using the maint branch of org-mode.git.  Which
>    means that neither the new exporter nor the new way of escaping Org
>    syntax in src code blocks are available...
> 
>    My guess is that your file org-e-beamer.org uses the new syntax for
>    src code blocks -- I had to use the org-mode.git *master* branch to
>    publish it correctly.
> 
>    We will need to update each begin_src block in Worg in order to use
>    a recent org-mode.git for publishing.
> 

In my file there are no begin_src blocks, however I do have
begin_example blocks like the following:

  #+begin_example
    ,#+LaTeX_CLASS: beamer
    ,#+LaTeX_CLASS_OPTIONS: [smaller,presentation]
    ,#+BEAMER_THEME: default
  #+end_example

I have not been following the list very closely for the last 5-6 months
(too many deadlines in real life :(), has the above escaping syntax been
changed?

Thanks,

-- 
Suvayu

Open source is the future. It sets us free.

Re: Worg publishing issue

[Nicolas Goaziou]

Hello,

Bastien <bzg@altern.org> writes:

> 2 problems, a trivial one and a let's-prepare-for-headache one:
>
> 1. `org-publish-org-to-html' does not exist in the new export/publish
>     libraries -- Nicolas, would that be enough to have aliases here
>     (from org-publish-org-to-html to org-html-publish-to-html)?  I
>     guess many people rely on thse org-publish-org-to* functions.

Publishing functions have been moved into their respective back-end.
That way, ox-publish.el doesn't have to know about every back-end
defined.

It's not very clean, but you can probably define aliases in
ox-publish.el, since real publishing functions should be autoloaded
anyway. If you do so, I suggest to, at least, provide a deprecation
notice.


Regards,

-- 
Nicolas Goaziou

Re: Worg publishing issue

[Suvayu Ali]

On Wed, Feb 06, 2013 at 02:19:03PM +0100, Suvayu Ali wrote:

[...]

> 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/13@07:01:27

I still see issues with the publishing.  My previous commit[1] to the FAQ
was not published.  The post-commit hook output had timed out on my end
then.  I had thought that was probably some network issue on my side but
that doesn't seem to be the case.  When I tried to push some more edits[2]
to that entry, I see the following message

remote: Worg publish process 11929 is still running...

Can someone please take a look?

Cheers,


Footnotes:

[1] <http://orgmode.org/cgit.cgi/worg.git/commit/?id=e6a51c5a553d6ab4d164af7d1ce54fbc5b5028a0>
[2] <http://orgmode.org/cgit.cgi/worg.git/commit/?id=12fadc1554816ecd21fddc0af589070a99e94245>

-- 
Suvayu

Open source is the future. It sets us free.

Re: Worg publishing issue

[Thorsten Jolitz]

Suvayu Ali <fatkasuvayu+linux@gmail.com> writes:

> I still see issues with the publishing.  My previous commit[1] to the FAQ
> was not published.  

I actually looked up the link after your post and everything looked
fine. 

> The post-commit hook output had timed out on my end
> then.  I had thought that was probably some network issue on my side but
> that doesn't seem to be the case.  When I tried to push some more edits[2]
> to that entry, I see the following message
>
> remote: Worg publish process 11929 is still running...
>
> Can someone please take a look?

I just looked up your second link, and everything looks fine again, here
is the unformatted version of what I see:

,------------------------------------------------------------------------------------------
| cgit logo       index : worg.git        
| Org community-driven documentation and code snippets    
| summaryrefslogtreecommitdiff    
| diff options
| context:        
| space:  
| mode:   
|         
| author  Suvayu Ali <fatkasuvayu+linux@gmail.com>        2013-02-08 22:48:12 (GMT)
| committer       Suvayu Ali <fatkasuvayu+linux@gmail.com>        2013-02-08 22:48:12 (GMT)
| commit  12fadc1554816ecd21fddc0af589070a99e94245 (patch)
| tree    7fe71f08c39d9dbb6c2ab3b6fbc264d7d66f12b0
| parent  e6a51c5a553d6ab4d164af7d1ce54fbc5b5028a0 (diff)
| download        worg-12fadc1554816ecd21fddc0af589070a99e94245.zip
| worg-12fadc1554816ecd21fddc0af589070a99e94245.tar.gz
| Update new exporter switch FAQHEADmaster
| Diffstat
| -rw-r--r--      org-faq.org     14      
|                 
| 1 files changed, 9 insertions, 5 deletions
| diff --git a/org-faq.org b/org-faq.org
| index 9df7818..7ea4087 100644
| --- a/org-faq.org
| +++ b/org-faq.org
| @@ -316,15 +316,19 @@ about the number of list readers.
| Some quick notes on how to switch to the new exporter.
| -1. Export engine renamed: org-export → ox
| -2. Backend requires renamed: org-e-* → ox-*
| -3. All backend specific variables and functions renamed:
| +1. If you had already been using the new exporter from contrib, you
| + should remove the following lines from your local.mk:
| + : ORG_ADD_CONTRIB = org-e-*
| + followed by a =make clean=, before you do =git pull=.
| +2. Export engine renamed: org-export → ox
| +3. Backend requires renamed: org-e-* → ox-*
| +4. All backend specific variables and functions renamed:
| - org-export-* → org-* (e.g. org-html-xml-declaration, ..)
| - org-e-* → org-* (e.g. org-latex-classes, org-ascii-bullets, ..)
| -4. Generic export variables retain the name org-export-*
| +5. Generic export variables retain the name org-export-*
| (e.g. org-export-dispatch-use-expert-ui,
| org-export-filter-headline-functions, ..)
| -5. org-latex-to-pdf-process has been renamed to org-latex-pdf-process
| +6. org-latex-to-pdf-process has been renamed to org-latex-pdf-process
| 7. This is a guess, export snippets and backend symbols renamed:
| - e-<backend> → <backend>
| generated by cgit v0.9.0.3-65-g4555 at 2013-02-08 23:32:04 (GMT)
`------------------------------------------------------------------------------------------

> [2] <http://orgmode.org/cgit.cgi/worg.git/commit/?id=12fadc1554816ecd21fddc0af589070a99e94245>

-- 
cheers,
Thorsten

Re: Worg publishing issue

[Thorsten Jolitz]

Suvayu Ali <fatkasuvayu+linux@gmail.com> writes:

ups, your probably did not refer to these git log links but to the (not)
published worg-site. sorry for the misunderstanding ...

> Footnotes:
>
> [1] <http://orgmode.org/cgit.cgi/worg.git/commit/?id=e6a51c5a553d6ab4d164af7d1ce54fbc5b5028a0>
> [2] <http://orgmode.org/cgit.cgi/worg.git/commit/?id=12fadc1554816ecd21fddc0af589070a99e94245>

-- 
cheers,
Thorsten

Re: Worg publishing issue

[Bastien]

Hi Nicolas,

Nicolas Goaziou <n.goaziou@gmail.com> writes:

> Bastien <bzg@altern.org> writes:
>
>> 2 problems, a trivial one and a let's-prepare-for-headache one:
>>
>> 1. `org-publish-org-to-html' does not exist in the new export/publish
>>     libraries -- Nicolas, would that be enough to have aliases here
>>     (from org-publish-org-to-html to org-html-publish-to-html)?  I
>>     guess many people rely on thse org-publish-org-to* functions.
>
> Publishing functions have been moved into their respective back-end.
> That way, ox-publish.el doesn't have to know about every back-end
> defined.

Thanks -- so that's not a problem for Worg, which uses Org from the
maint branch for publishing.  I've just fixed the bug in maint that
prevented Worg from publishing correctly.

> It's not very clean, but you can probably define aliases in
> ox-publish.el, since real publishing functions should be autoloaded
> anyway. If you do so, I suggest to, at least, provide a deprecation
> notice.*

I don't plan to add those aliases, let's move forward and add the
deprecation notice in the 8.0 release announcement (and on Worg.)

Thanks,

-- 
 Bastien

Re: Worg publishing issue

[Bastien]

Hi Suvayu,

Suvayu Ali <fatkasuvayu+linux@gmail.com> writes:

> In my file there are no begin_src blocks, however I do have
> begin_example blocks like the following:
>
>   #+begin_example
>     ,#+LaTeX_CLASS: beamer
>     ,#+LaTeX_CLASS_OPTIONS: [smaller,presentation]
>     ,#+BEAMER_THEME: default
>   #+end_example
>
> I have not been following the list very closely for the last 5-6 months
> (too many deadlines in real life :(), has the above escaping syntax been
> changed?

The problem was not in your file at all, it was in a bug I introduced
in the maint branch, it is fixed now.  Worg is wide open to new contribs!

Thanks,

-- 
 Bastien

Re: Worg publishing issue

[Suvayu Ali]

On Wed, Feb 13, 2013 at 06:32:46PM +0100, Bastien wrote:
> 
> The problem was not in your file at all, it was in a bug I introduced
> in the maint branch, it is fixed now.  Worg is wide open to new contribs!

Thanks a lot Bastien!

-- 
Suvayu

Open source is the future. It sets us free.