publish not working in git version

publish not working in git version

[Richard Riley]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain; charset=us-ascii, Size: 1512 bytes --]


Just a heads up for those that use publish - todays git version does not
publish (or not here anyway). Backtracking to official 13a works fine.

I got this back trace from org-publish-current-file:

,----
| Debugger entered--Lisp error: (wrong-type-argument arrayp nil)
|   file-truename(nil)
|   org-publish-file("/home/shamrock/webs/richardriley/index.org")
|   byte-code("\b?…\x06	\x19ÂÃ !)‡" [force org-publish-use-timestamps-flag org-publish-file buffer-file-name] 2)
|   org-publish-current-file(nil)
|   call-interactively(org-publish-current-file)
|   org-export(nil)
|   call-interactively(org-export nil nil)
|   recursive-edit()
|   byte-code("Æ\x10	@Ç=ƒ!ÈÉÊ\"ˆËÉ!‰\x1aA@)¢Ì=ƒ!ÈÍÊ\"ˆÎ\v!ˆÏ ˆÐ	!ˆ\fƒdÑed\"
VƒWebˆÒ
¥yˆ`\x1e^[dbˆÒ
¥
Zyˆ\x0e^[`|ˆ)ÓcˆebˆÔÕÖ \"ˆ×Æ!ˆÔØ!ˆÙÊ\x1e\x1c\x1e\x1dÔØ!ˆŠÚ ˆ+Ù‡" [unread-command-char debugger-args x debugger-buffer noninteractive debugger-batch-max-lines -1 debug backtrace-debug 4 t backtrace-frame lambda 5 pop-to-buffer debugger-mode debugger-setup-buffer count-lines 2 "...\n" message "%s" buffer-string kill-emacs "" nil recursive-edit middlestart buffer-read-only standard-output] 4)
|   debug(error (wrong-type-argument arrayp nil))
|   file-truename(nil)
|   org-publish-file("/home/shamrock/webs/richardriley/index.org")
|   byte-code("\b?…\x06	\x19ÂÃ !)‡" [force org-publish-use-timestamps-flag org-publish-file buffer-file-name] 2)
|   org-publish-current-file(nil)
|   call-interactively(org-publish-current-file)
|   org-export(nil)
|   call-interactively(org-export nil nil)
`----

regards

r.

Re: publish not working in git version

[Carsten Dominik]

Hi Richard,

I cannot reproduce this problem.  Can you try to make a backtrace with  
uncompiled code so that I can at least identify the exact place where  
this bug is happening?

Also your org-publish-alist would be good, and the project where this  
happens.

Thanks.

Anyone else having trouble with publishing recently?

- Carsten


On Nov 30, 2008, at 5:53 PM, Richard Riley wrote:

>
> Just a heads up for those that use publish - todays git version does  
> not
> publish (or not here anyway). Backtracking to official 13a works fine.
>
> I got this back trace from org-publish-current-file:
>
> ,----
> | Debugger entered--Lisp error: (wrong-type-argument arrayp nil)
> |   file-truename(nil)
> |   org-publish-file("/home/shamrock/webs/richardriley/index.org")
> |   byte-code("\b?
> \x06	\x19ÂÃ !)‡" [force org-publish-use-timestamps-flag org-publish-file  
> buffer-file-name] 2)
> |   org-publish-current-file(nil)
> |   call-interactively(org-publish-current-file)
> |   org-export(nil)
> |   call-interactively(org-export nil nil)
> |   recursive-edit()
> |   byte-code("Æ\x10	@Ç=ƒ!ÈÉÊ\"ˆËÉ!‰\x1aA@)¢Ì=ƒ!ÈÍÊ\"ˆÎ\v!ˆÏ ˆÐ	!ˆ\fƒdÑed\"
> VƒWebˆÒ
> ¥yˆ`\x1e^[dbˆÒ
> ¥
> Zyˆ\x0e^[`|ˆ)ÓcˆebˆÔÕÖ \"ˆ×Æ!ˆÔØ!ˆÙÊ\x1e\x1c\x1e\x1dÔØ!ˆŠÚ ˆ+Ù‡" [unread-command- 
> char debugger-args x debugger-buffer noninteractive debugger-batch- 
> max-lines -1 debug backtrace-debug 4 t backtrace-frame lambda 5 pop- 
> to-buffer debugger-mode debugger-setup-buffer count-lines 2 "...\n"  
> message "%s" buffer-string kill-emacs "" nil recursive-edit  
> middlestart buffer-read-only standard-output] 4)
> |   debug(error (wrong-type-argument arrayp nil))
> |   file-truename(nil)
> |   org-publish-file("/home/shamrock/webs/richardriley/index.org")
> |   byte-code("\b?
> \x06	\x19ÂÃ !)‡" [force org-publish-use-timestamps-flag org-publish-file  
> buffer-file-name] 2)
> |   org-publish-current-file(nil)
> |   call-interactively(org-publish-current-file)
> |   org-export(nil)
> |   call-interactively(org-export nil nil)
> `----
>
> regards
>
> r.
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Remember: use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode

Re: publish not working in git version

[Bernt Hansen]

Carsten Dominik <dominik@science.uva.nl> writes:

> Anyone else having trouble with publishing recently?

Publishing seems to work for me.

-Bernt

Re: Re: publish not working in git version

[Richard Riley]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain; charset=us-ascii, Size: 6970 bytes --]


Bernt Hansen <bernt@norang.ca> writes:

> Carsten Dominik <dominik@science.uva.nl> writes:
>
>> Anyone else having trouble with publishing recently?
>
> Publishing seems to work for me.
>

Hi Carsten,

Still the same. I removed the elc from org code as you requested.

Latest git, following a publish file "C-c C-e f":

,----
| Debugger entered--Lisp error: (wrong-type-argument arrayp nil)
|   file-truename(nil)
|   (file-name-as-directory (file-truename (plist-get project-plist :base-directory)))
|   (let* ((project ...) (project-plist ...) (ftname ...) (publishing-function ...) (base-dir ...) (pub-dir ...) tmp-pub-dir) (setq tmp-pub-dir (file-name-directory ...)) (if (listp publishing-function) (mapc ... publishing-function) (funcall publishing-function project-plist filename tmp-pub-dir)))
|   (progn (let* (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub-dir ...) (if ... ... ...)) (org-publish-update-timestamp filename))
|   (if (org-publish-needed-p filename) (progn (let* ... ... ...) (org-publish-update-timestamp filename)))
|   (when (org-publish-needed-p filename) (let* (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub-dir ...) (if ... ... ...)) (org-publish-update-timestamp filename))
|   org-publish-file("/home/shamrock/webs/richardriley/index.org")
|   (let ((org-publish-use-timestamps-flag ...)) (org-publish-file (buffer-file-name)))
|   (save-window-excursion (let (...) (org-publish-file ...)))
|   org-publish-current-file(nil)
|   call-interactively(org-publish-current-file)
|   (if (and bg (nth 2 ass) (not ...) (not ...)) (let (...) (set-process-sentinel p ...) (message "Background process \"%s\": started" p)) (call-interactively (nth 1 ass)))
|   (let* ((bg ...) (help "[t]   insert the export option template\n[v]   limit export to visible part of outline tree\n\n[a] export as ASCII\n\n[h] export as HTML\n[H] export as HTML to temporary buffer\n[R] export region as HTML\n[b] export as HTML and browse immediately\n[x] export as XOXO\n\n[l] export as LaTeX\n[p] export as LaTeX and process to PDF\n[d] export as LaTeX, process to PDF, and open the resulting PDF document\n[L] export as LaTeX to temporary buffer\n\n[i] export current file as iCalendar file\n[I] export all agenda files as iCalendar files\n[c] export agenda files into combined iCalendar file\n\n[F] publish current file\n[P] publish current project\n[X] publish... (project will be prompted for)\n[A] publish all projects") (cmds ...) r1 r2 ass) (save-window-excursion (delete-other-windows) (with-output-to-temp-buffer "*Org Export/Publishing Help*" ...) (org-fit-window-to-buffer ...) (message "Select command: ") (setq r1 ...)) (setq r2 (if ... ... r1)) (unless (setq ass ...) (error "No command associated with key %c" r1)) (if (and bg ... ... ...) (let ... ... ...) (call-interactively ...)))
|   org-export(nil)
|   call-interactively(org-export nil nil)
|   recursive-edit()
|   byte-code("Æ\x10	@Ç=ƒ!\0ÈÉÊ\"ˆËÉ!‰\x1aA@)¢Ì=ƒ!\0ÈÍÊ\"ˆÎ\v!ˆÏ ˆÐ	!ˆ\fƒd\0Ñed\"\rVƒW\0ebˆÒ\r¥yˆ`\x1e^[dbˆÒ\r¥\rZyˆ\x0e^[`|ˆ)ÓcˆebˆÔÕÖ \"ˆ×Æ!ˆÔØ!ˆÙÊ\x1e\x1c\x1e\x1dÔØ!ˆŠÚ ˆ+Ù‡" [unread-command-char debugger-args x debugger-buffer noninteractive debugger-batch-max-lines -1 debug backtrace-debug 4 t backtrace-frame lambda 5 pop-to-buffer debugger-mode debugger-setup-buffer count-lines 2 "...\n" message "%s" buffer-string kill-emacs "" nil recursive-edit middlestart buffer-read-only standard-output] 4)
|   debug(error (wrong-type-argument arrayp nil))
|   file-truename(nil)
|   (file-name-as-directory (file-truename (plist-get project-plist :base-directory)))
|   (let* ((project ...) (project-plist ...) (ftname ...) (publishing-function ...) (base-dir ...) (pub-dir ...) tmp-pub-dir) (setq tmp-pub-dir (file-name-directory ...)) (if (listp publishing-function) (mapc ... publishing-function) (funcall publishing-function project-plist filename tmp-pub-dir)))
|   (progn (let* (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub-dir ...) (if ... ... ...)) (org-publish-update-timestamp filename))
|   (if (org-publish-needed-p filename) (progn (let* ... ... ...) (org-publish-update-timestamp filename)))
|   (when (org-publish-needed-p filename) (let* (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub-dir ...) (if ... ... ...)) (org-publish-update-timestamp filename))
|   org-publish-file("/home/shamrock/webs/richardriley/index.org")
|   (let ((org-publish-use-timestamps-flag ...)) (org-publish-file (buffer-file-name)))
|   (save-window-excursion (let (...) (org-publish-file ...)))
|   org-publish-current-file(nil)
|   call-interactively(org-publish-current-file)
|   (if (and bg (nth 2 ass) (not ...) (not ...)) (let (...) (set-process-sentinel p ...) (message "Background process \"%s\": started" p)) (call-interactively (nth 1 ass)))
|   (let* ((bg ...) (help "[t]   insert the export option template\n[v]   limit export to visible part of outline tree\n\n[a] export as ASCII\n\n[h] export as HTML\n[H] export as HTML to temporary buffer\n[R] export region as HTML\n[b] export as HTML and browse immediately\n[x] export as XOXO\n\n[l] export as LaTeX\n[p] export as LaTeX and process to PDF\n[d] export as LaTeX, process to PDF, and open the resulting PDF document\n[L] export as LaTeX to temporary buffer\n\n[i] export current file as iCalendar file\n[I] export all agenda files as iCalendar files\n[c] export agenda files into combined iCalendar file\n\n[F] publish current file\n[P] publish current project\n[X] publish... (project will be prompted for)\n[A] publish all projects") (cmds ...) r1 r2 ass) (save-window-excursion (delete-other-windows) (with-output-to-temp-buffer "*Org Export/Publishing Help*" ...) (org-fit-window-to-buffer ...) (message "Select command: ") (setq r1 ...)) (setq r2 (if ... ... r1)) (unless (setq ass ...) (error "No command associated with key %c" r1)) (if (and bg ... ... ...) (let ... ... ...) (call-interactively ...)))
|   org-export(nil)
|   call-interactively(org-export nil nil)
`----


My project lists are:

,----
| (setq org-publish-project-alist
|       `(
| 	("web-extra"
| 	 :base-directory ,rgr-source
| 	 :publishing-directory ,rgr-publish
| 	 :base-extension "gif\\|jpg\\|jpeg\\|png\\|css"
| 	 :publishing-function org-publish-attachment
|          :recursive t
| 	 )
| 	("web-org"
| 	 :base-directory ,rgr-source
| 	 :publishing-directory ,rgr-publish
| 	 :base-extension "org"
| 	 :publishing-function org-publish-org-to-html
|          :recursive t
| 	 :section-numbers nil
| 	 :style "<link rel=stylesheet
|                      href=\"./style.css\"
|                      type=\"text/css\">"
| 	 :auto-preamble t
| 	 :auto-postamble t
| 	 :preamble ,(format "<div id='Content'><a href='../'>Back</a> - <a href='%s'>Home</a>" rgr-home)
| 	 :postamble "</div>"
| 	 :author nil
| 	 )
| 	("web"
| 	 :components("web-org" "web-extra")
| 	 )
| 	)
|       )
| 
`----

And as I say, the latest official release works fine.

regards

Richard.

Re: Re: publish not working in git version

[Carsten Dominik]

Hi Richard, the new backtrace shows that your project does not define  
a base directory.

- Carsten

On Dec 2, 2008, at 5:32 PM, Richard Riley wrote:

>
> Bernt Hansen <bernt@norang.ca> writes:
>
>> Carsten Dominik <dominik@science.uva.nl> writes:
>>
>>> Anyone else having trouble with publishing recently?
>>
>> Publishing seems to work for me.
>>
>
> Hi Carsten,
>
> Still the same. I removed the elc from org code as you requested.
>
> Latest git, following a publish file "C-c C-e f":
>
> ,----
> | Debugger entered--Lisp error: (wrong-type-argument arrayp nil)
> |   file-truename(nil)
> |   (file-name-as-directory (file-truename (plist-get project- 
> plist :base-directory)))
> |   (let* ((project ...) (project-plist ...) (ftname ...)  
> (publishing-function ...) (base-dir ...) (pub-dir ...) tmp-pub-dir)  
> (setq tmp-pub-dir (file-name-directory ...)) (if (listp publishing- 
> function) (mapc ... publishing-function) (funcall publishing- 
> function project-plist filename tmp-pub-dir)))
> |   (progn (let* (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub- 
> dir ...) (if ... ... ...)) (org-publish-update-timestamp filename))
> |   (if (org-publish-needed-p filename) (progn (let* ... ... ...)  
> (org-publish-update-timestamp filename)))
> |   (when (org-publish-needed-p filename) (let*  
> (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub-dir ...)  
> (if ... ... ...)) (org-publish-update-timestamp filename))
> |   org-publish-file("/home/shamrock/webs/richardriley/index.org")
> |   (let ((org-publish-use-timestamps-flag ...)) (org-publish-file  
> (buffer-file-name)))
> |   (save-window-excursion (let (...) (org-publish-file ...)))
> |   org-publish-current-file(nil)
> |   call-interactively(org-publish-current-file)
> |   (if (and bg (nth 2 ass) (not ...) (not ...)) (let (...) (set- 
> process-sentinel p ...) (message "Background process \"%s\":  
> started" p)) (call-interactively (nth 1 ass)))
> |   (let* ((bg ...) (help "[t]   insert the export option template 
> \n[v]   limit export to visible part of outline tree\n\n[a] export  
> as ASCII\n\n[h] export as HTML\n[H] export as HTML to temporary  
> buffer\n[R] export region as HTML\n[b] export as HTML and browse  
> immediately\n[x] export as XOXO\n\n[l] export as LaTeX\n[p] export  
> as LaTeX and process to PDF\n[d] export as LaTeX, process to PDF,  
> and open the resulting PDF document\n[L] export as LaTeX to  
> temporary buffer\n\n[i] export current file as iCalendar file\n[I]  
> export all agenda files as iCalendar files\n[c] export agenda files  
> into combined iCalendar file\n\n[F] publish current file\n[P]  
> publish current project\n[X] publish... (project will be prompted  
> for)\n[A] publish all projects") (cmds ...) r1 r2 ass) (save-window- 
> excursion (delete-other-windows) (with-output-to-temp-buffer "*Org  
> Export/Publishing Help*" ...) (org-fit-window-to-buffer ...)  
> (message "Select command: ") (setq r1 ...)) (setq r2 (if ... ...  
> r1)) (unless (setq ass ...) (error "No command associated with key  
> %c" r1)) (if (and bg ... ... ...) (let ... ... ...) (call- 
> interactively ...)))
> |   org-export(nil)
> |   call-interactively(org-export nil nil)
> |   recursive-edit()
> |   byte-code("Æ\x10	@Ç=ƒ!ÈÉÊ\"ˆËÉ!‰\x1aA@)¢Ì=ƒ!ÈÍÊ\"ˆÎ\v!ˆÏ ˆÐ	!ˆ\fƒdÑed\"
> VƒWebˆÒ
> ¥yˆ`\x1e^[dbˆÒ
> ¥
> Zyˆ\x0e^[`|ˆ)ÓcˆebˆÔÕÖ \"ˆ×Æ!ˆÔØ!ˆÙÊ\x1e\x1c\x1e\x1dÔØ!ˆŠÚ ˆ+Ù‡" [unread-command- 
> char debugger-args x debugger-buffer noninteractive debugger-batch- 
> max-lines -1 debug backtrace-debug 4 t backtrace-frame lambda 5 pop- 
> to-buffer debugger-mode debugger-setup-buffer count-lines 2 "...\n"  
> message "%s" buffer-string kill-emacs "" nil recursive-edit  
> middlestart buffer-read-only standard-output] 4)
> |   debug(error (wrong-type-argument arrayp nil))
> |   file-truename(nil)
> |   (file-name-as-directory (file-truename (plist-get project- 
> plist :base-directory)))
> |   (let* ((project ...) (project-plist ...) (ftname ...)  
> (publishing-function ...) (base-dir ...) (pub-dir ...) tmp-pub-dir)  
> (setq tmp-pub-dir (file-name-directory ...)) (if (listp publishing- 
> function) (mapc ... publishing-function) (funcall publishing- 
> function project-plist filename tmp-pub-dir)))
> |   (progn (let* (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub- 
> dir ...) (if ... ... ...)) (org-publish-update-timestamp filename))
> |   (if (org-publish-needed-p filename) (progn (let* ... ... ...)  
> (org-publish-update-timestamp filename)))
> |   (when (org-publish-needed-p filename) (let*  
> (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub-dir ...)  
> (if ... ... ...)) (org-publish-update-timestamp filename))
> |   org-publish-file("/home/shamrock/webs/richardriley/index.org")
> |   (let ((org-publish-use-timestamps-flag ...)) (org-publish-file  
> (buffer-file-name)))
> |   (save-window-excursion (let (...) (org-publish-file ...)))
> |   org-publish-current-file(nil)
> |   call-interactively(org-publish-current-file)
> |   (if (and bg (nth 2 ass) (not ...) (not ...)) (let (...) (set- 
> process-sentinel p ...) (message "Background process \"%s\":  
> started" p)) (call-interactively (nth 1 ass)))
> |   (let* ((bg ...) (help "[t]   insert the export option template 
> \n[v]   limit export to visible part of outline tree\n\n[a] export  
> as ASCII\n\n[h] export as HTML\n[H] export as HTML to temporary  
> buffer\n[R] export region as HTML\n[b] export as HTML and browse  
> immediately\n[x] export as XOXO\n\n[l] export as LaTeX\n[p] export  
> as LaTeX and process to PDF\n[d] export as LaTeX, process to PDF,  
> and open the resulting PDF document\n[L] export as LaTeX to  
> temporary buffer\n\n[i] export current file as iCalendar file\n[I]  
> export all agenda files as iCalendar files\n[c] export agenda files  
> into combined iCalendar file\n\n[F] publish current file\n[P]  
> publish current project\n[X] publish... (project will be prompted  
> for)\n[A] publish all projects") (cmds ...) r1 r2 ass) (save-window- 
> excursion (delete-other-windows) (with-output-to-temp-buffer "*Org  
> Export/Publishing Help*" ...) (org-fit-window-to-buffer ...)  
> (message "Select command: ") (setq r1 ...)) (setq r2 (if ... ...  
> r1)) (unless (setq ass ...) (error "No command associated with key  
> %c" r1)) (if (and bg ... ... ...) (let ... ... ...) (call- 
> interactively ...)))
> |   org-export(nil)
> |   call-interactively(org-export nil nil)
> `----
>
>
> My project lists are:
>
> ,----
> | (setq org-publish-project-alist
> |       `(
> | 	("web-extra"
> | 	 :base-directory ,rgr-source
> | 	 :publishing-directory ,rgr-publish
> | 	 :base-extension "gif\\|jpg\\|jpeg\\|png\\|css"
> | 	 :publishing-function org-publish-attachment
> |          :recursive t
> | 	 )
> | 	("web-org"
> | 	 :base-directory ,rgr-source
> | 	 :publishing-directory ,rgr-publish
> | 	 :base-extension "org"
> | 	 :publishing-function org-publish-org-to-html
> |          :recursive t
> | 	 :section-numbers nil
> | 	 :style "<link rel=stylesheet
> |                      href=\"./style.css\"
> |                      type=\"text/css\">"
> | 	 :auto-preamble t
> | 	 :auto-postamble t
> | 	 :preamble ,(format "<div id='Content'><a href='../'>Back</a> -  
> <a href='%s'>Home</a>" rgr-home)
> | 	 :postamble "</div>"
> | 	 :author nil
> | 	 )
> | 	("web"
> | 	 :components("web-org" "web-extra")
> | 	 )
> | 	)
> |       )
> |
> `----
>
> And as I say, the latest official release works fine.
>
> regards
>
> Richard.

Re: Re: publish not working in git version

[Richard Riley]

Carsten Dominik <dominik@science.uva.nl> writes:

> Hi Richard, the new backtrace shows that your project does not define
> a base directory.

I'll take a look, but this is very strange since it works fine with the
release version. Its only the git version it falls over on.

Thanks,

r.


>
> - Carsten
>
> On Dec 2, 2008, at 5:32 PM, Richard Riley wrote:
>
>>
>> Bernt Hansen <bernt@norang.ca> writes:
>>
>>> Carsten Dominik <dominik@science.uva.nl> writes:
>>>
>>>> Anyone else having trouble with publishing recently?
>>>
>>> Publishing seems to work for me.
>>>
>>
>> Hi Carsten,
>>
>> Still the same. I removed the elc from org code as you requested.
>>
>> Latest git, following a publish file "C-c C-e f":
>>
>> ,----
>> | Debugger entered--Lisp error: (wrong-type-argument arrayp nil)
>> |   file-truename(nil)
>> |   (file-name-as-directory (file-truename (plist-get project-
>> plist :base-directory)))
>> |   (let* ((project ...) (project-plist ...) (ftname ...)
>> (publishing-function ...) (base-dir ...) (pub-dir ...) tmp-pub-dir)
>> (setq tmp-pub-dir (file-name-directory ...)) (if (listp publishing- 
>> function) (mapc ... publishing-function) (funcall publishing-
>> function project-plist filename tmp-pub-dir)))
>> |   (progn (let* (... ... ... ... ... ... tmp-pub-dir) (setq
>> tmp-pub-
>> dir ...) (if ... ... ...)) (org-publish-update-timestamp filename))
>> |   (if (org-publish-needed-p filename) (progn (let* ... ... ...)
>> (org-publish-update-timestamp filename)))
>> |   (when (org-publish-needed-p filename) (let*
>> (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub-dir ...)  (if
>> ... ... ...)) (org-publish-update-timestamp filename))
>> |   org-publish-file("/home/shamrock/webs/richardriley/index.org")
>> |   (let ((org-publish-use-timestamps-flag ...)) (org-publish-file
>> (buffer-file-name)))
>> |   (save-window-excursion (let (...) (org-publish-file ...)))
>> |   org-publish-current-file(nil)
>> |   call-interactively(org-publish-current-file)
>> |   (if (and bg (nth 2 ass) (not ...) (not ...)) (let (...) (set-
>> process-sentinel p ...) (message "Background process \"%s\":
>> started" p)) (call-interactively (nth 1 ass)))
>> |   (let* ((bg ...) (help "[t]   insert the export option template
>> \n[v]   limit export to visible part of outline tree\n\n[a] export
>> as ASCII\n\n[h] export as HTML\n[H] export as HTML to temporary
>> buffer\n[R] export region as HTML\n[b] export as HTML and browse
>> immediately\n[x] export as XOXO\n\n[l] export as LaTeX\n[p] export
>> as LaTeX and process to PDF\n[d] export as LaTeX, process to PDF,
>> and open the resulting PDF document\n[L] export as LaTeX to
>> temporary buffer\n\n[i] export current file as iCalendar file\n[I]
>> export all agenda files as iCalendar files\n[c] export agenda files
>> into combined iCalendar file\n\n[F] publish current file\n[P]
>> publish current project\n[X] publish... (project will be prompted
>> for)\n[A] publish all projects") (cmds ...) r1 r2 ass) (save-window- 
>> excursion (delete-other-windows) (with-output-to-temp-buffer "*Org
>> Export/Publishing Help*" ...) (org-fit-window-to-buffer ...)
>> (message "Select command: ") (setq r1 ...)) (setq r2 (if ... ...
>> r1)) (unless (setq ass ...) (error "No command associated with key
>> %c" r1)) (if (and bg ... ... ...) (let ... ... ...) (call- 
>> interactively ...)))
>> |   org-export(nil)
>> |   call-interactively(org-export nil nil)
>> |   recursive-edit()
>> |   byte-code("Æ\x10	@Ç=ƒ!ÈÉÊ\"ˆËÉ!‰\x1aA@)¢Ì=ƒ!ÈÍÊ\"ˆÎ\v!ˆÏ ˆÐ	!ˆ\fƒdÑed\"
>> VƒWebˆÒ
>> ¥yˆ`\x1e^[dbˆÒ
>> ¥
>> Zyˆ\x0e^[`|ˆ)ÓcˆebˆÔÕÖ \"ˆ×Æ!ˆÔØ!ˆÙÊ\x1e\x1c\x1e\x1dÔØ!ˆŠÚ ˆ+Ù‡"
>> [unread-command-
>> char debugger-args x debugger-buffer noninteractive debugger-batch-
>> max-lines -1 debug backtrace-debug 4 t backtrace-frame lambda 5 pop-
>> to-buffer debugger-mode debugger-setup-buffer count-lines 2 "...\n"
>> message "%s" buffer-string kill-emacs "" nil recursive-edit
>> middlestart buffer-read-only standard-output] 4)
>> |   debug(error (wrong-type-argument arrayp nil))
>> |   file-truename(nil)
>> |   (file-name-as-directory (file-truename (plist-get project-
>> plist :base-directory)))
>> |   (let* ((project ...) (project-plist ...) (ftname ...)
>> (publishing-function ...) (base-dir ...) (pub-dir ...) tmp-pub-dir)
>> (setq tmp-pub-dir (file-name-directory ...)) (if (listp publishing- 
>> function) (mapc ... publishing-function) (funcall publishing-
>> function project-plist filename tmp-pub-dir)))
>> |   (progn (let* (... ... ... ... ... ... tmp-pub-dir) (setq
>> tmp-pub-
>> dir ...) (if ... ... ...)) (org-publish-update-timestamp filename))
>> |   (if (org-publish-needed-p filename) (progn (let* ... ... ...)
>> (org-publish-update-timestamp filename)))
>> |   (when (org-publish-needed-p filename) (let*
>> (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub-dir ...)  (if
>> ... ... ...)) (org-publish-update-timestamp filename))
>> |   org-publish-file("/home/shamrock/webs/richardriley/index.org")
>> |   (let ((org-publish-use-timestamps-flag ...)) (org-publish-file
>> (buffer-file-name)))
>> |   (save-window-excursion (let (...) (org-publish-file ...)))
>> |   org-publish-current-file(nil)
>> |   call-interactively(org-publish-current-file)
>> |   (if (and bg (nth 2 ass) (not ...) (not ...)) (let (...) (set-
>> process-sentinel p ...) (message "Background process \"%s\":
>> started" p)) (call-interactively (nth 1 ass)))
>> |   (let* ((bg ...) (help "[t]   insert the export option template
>> \n[v]   limit export to visible part of outline tree\n\n[a] export
>> as ASCII\n\n[h] export as HTML\n[H] export as HTML to temporary
>> buffer\n[R] export region as HTML\n[b] export as HTML and browse
>> immediately\n[x] export as XOXO\n\n[l] export as LaTeX\n[p] export
>> as LaTeX and process to PDF\n[d] export as LaTeX, process to PDF,
>> and open the resulting PDF document\n[L] export as LaTeX to
>> temporary buffer\n\n[i] export current file as iCalendar file\n[I]
>> export all agenda files as iCalendar files\n[c] export agenda files
>> into combined iCalendar file\n\n[F] publish current file\n[P]
>> publish current project\n[X] publish... (project will be prompted
>> for)\n[A] publish all projects") (cmds ...) r1 r2 ass) (save-window- 
>> excursion (delete-other-windows) (with-output-to-temp-buffer "*Org
>> Export/Publishing Help*" ...) (org-fit-window-to-buffer ...)
>> (message "Select command: ") (setq r1 ...)) (setq r2 (if ... ...
>> r1)) (unless (setq ass ...) (error "No command associated with key
>> %c" r1)) (if (and bg ... ... ...) (let ... ... ...) (call- 
>> interactively ...)))
>> |   org-export(nil)
>> |   call-interactively(org-export nil nil)
>> `----
>>
>>
>> My project lists are:
>>
>> ,----
>> | (setq org-publish-project-alist
>> |       `(
>> | 	("web-extra"
>> | 	 :base-directory ,rgr-source
>> | 	 :publishing-directory ,rgr-publish
>> | 	 :base-extension "gif\\|jpg\\|jpeg\\|png\\|css"
>> | 	 :publishing-function org-publish-attachment
>> |          :recursive t
>> | 	 )
>> | 	("web-org"
>> | 	 :base-directory ,rgr-source
>> | 	 :publishing-directory ,rgr-publish
>> | 	 :base-extension "org"
>> | 	 :publishing-function org-publish-org-to-html
>> |          :recursive t
>> | 	 :section-numbers nil
>> | 	 :style "<link rel=stylesheet
>> |                      href=\"./style.css\"
>> |                      type=\"text/css\">"
>> | 	 :auto-preamble t
>> | 	 :auto-postamble t
>> | 	 :preamble ,(format "<div id='Content'><a href='../'>Back</a>
>> - 
>> <a href='%s'>Home</a>" rgr-home)
>> | 	 :postamble "</div>"
>> | 	 :author nil
>> | 	 )
>> | 	("web"
>> | 	 :components("web-org" "web-extra")
>> | 	 )
>> | 	)
>> |       )
>> |
>> `----
>>
>> And as I say, the latest official release works fine.
>>
>> regards
>>
>> Richard.

-- 
 important and urgent problems of the technology of today are no longer the satisfactions of the primary needs or of archetypal wishes, but the reparation of the evils and damages by the technology of yesterday.  ~Dennis Gabor, Innovations:  Scientific, Technological and Social, 1970

Re: publish not working in git version

[Sebastian Rose]

Carsten Dominik <dominik@science.uva.nl> writes:
> Anyone else having trouble with publishing recently?

Publishing is great - and works here.


Regards,

-- 
Sebastian Rose, EMMA STIL - mediendesign, Niemeyerstr.6, 30449 Hannover

Tel.:  +49 (0)511 - 36 58 472
Fax:   +49 (0)1805 - 233633 - 11044
mobil: +49 (0)173 - 83 93 417
Email: s.rose emma-stil de, sebastian_rose gmx de
Http:  www.emma-stil.de

Re: publish not working in git version

[Richard Riley]

Sebastian Rose <sebastian_rose@gmx.de> writes:

> Carsten Dominik <dominik@science.uva.nl> writes:
>> Anyone else having trouble with publishing recently?
>
> Publishing is great - and works here.

Hi Sebastion,

Do you have latest git head and publish to an ssh destination via tramp?

>
>
> Regards,

-- 
 important and urgent problems of the technology of today are no longer the satisfactions of the primary needs or of archetypal wishes, but the reparation of the evils and damages by the technology of yesterday.  ~Dennis Gabor, Innovations:  Scientific, Technological and Social, 1970

Re: publish not working in git version

[Bernt Hansen]

Richard Riley <rileyrgdev@googlemail.com> writes:

> Hi Sebastion,
>
> Do you have latest git head and publish to an ssh destination via tramp?

I do ... and it works for me.

-Bernt

Re: publish not working in git version

[Sebastian Rose]

Richard Riley <rileyrgdev@googlemail.com> writes:
> Sebastian Rose <sebastian_rose@gmx.de> writes:
>
>> Carsten Dominik <dominik@science.uva.nl> writes:
>>> Anyone else having trouble with publishing recently?
>>
>> Publishing is great - and works here.
>
> Hi Sebastion,
>
> Do you have latest git head and publish to an ssh destination via tramp?

Hi Richard,



I use the current git-version, yes.

But I just publish the stuff localy (i.e. the same filesystem).

Also, I don't use any variables in my org-publish-project-alist. Just
fixed strings.




Regards,

-- 
Sebastian Rose, EMMA STIL - mediendesign, Niemeyerstr.6, 30449 Hannover

Tel.:  +49 (0)511 - 36 58 472
Fax:   +49 (0)1805 - 233633 - 11044
mobil: +49 (0)173 - 83 93 417
Email: s.rose emma-stil de, sebastian_rose gmx de
Http:  www.emma-stil.de