Hi all,
I've just updated to latest tla revisions for planner, emacs-wiki, and
remember and am seeing the following when I call
emacs-wiki-publish-this-file:
Warning (emacs-wiki): *emacs-wiki-temp*: Error occurred:
(wrong-type-argument stringp nil)
I tried setting debug-on-error t and get a backtrace (below). I think
I must have some outdated thing in my config causing problems. I'd be
most appreciative of help pinpointing it.
Thanks,
+ seth
Here's the backtrace:
Debugger entered--Lisp error: (wrong-type-argument stringp nil)
file-name-nondirectory(nil)
set-visited-file-name("/Users/seth/Notebook/web/Plans/TingAgenda.html" t)
write-file("/Users/seth/Notebook/web/Plans/TingAgenda.html")
(let ((backup-inhibited t) (buffer-file-coding-system ...)
(find-file-literally t)) (when (eq buffer-file-coding-system ...) (setq
buffer-file-coding-system emacs-wiki-coding-default)) (write-file output-path))
emacs-wiki-write-buffer("/Users/seth/Notebook/web/Plans/TingAgenda.html")
(let ((emacs-wiki-publishing-p t) (emacs-wiki-current-file file))
(insert-file-contents file) (cd (file-name-directory file)) (emacs-wiki-maybe)
(setq emacs-wiki-current-file file) (setq buffer-file-name nil) (unless
(string-match emacs-wiki-image-regexp ...) (emacs-wiki-replace-markup))
(emacs-wiki-write-buffer output-path))
(save-current-buffer (set-buffer temp-buffer) (let (... ...)
(insert-file-contents file) (cd ...) (emacs-wiki-maybe) (setq
emacs-wiki-current-file file) (setq buffer-file-name nil) (unless ... ...)
(emacs-wiki-write-buffer output-path)))
(with-current-buffer temp-buffer (let (... ...) (insert-file-contents file)
(cd ...) (emacs-wiki-maybe) (setq emacs-wiki-current-file file) (setq
buffer-file-name nil) (unless ... ...) (emacs-wiki-write-buffer output-path)))
(if debug-on-error (with-current-buffer temp-buffer (let ... ... ... ... ...
... ... ...)) (condition-case err (with-current-buffer temp-buffer ...) (error
...)))
(unwind-protect (if debug-on-error (with-current-buffer temp-buffer ...)
(condition-case err ... ...)) (when (buffer-live-p temp-buffer)
(with-current-buffer temp-buffer ...) (unless debug-on-error ...)))
(let ((temp-buffer ...)) (unwind-protect (if debug-on-error ... ...) (when
... ... ...)))
(emacs-wiki-with-temp-buffer (let (... ...) (insert-file-contents file) (cd
...) (emacs-wiki-maybe) (setq emacs-wiki-current-file file) (setq
buffer-file-name nil) (unless ... ...) (emacs-wiki-write-buffer output-path)))
emacs-wiki-publish-current("/Users/seth/Notebook/wiki/Plans/TingAgenda"
"/Users/seth/Notebook/web/Plans/TingAgenda.html")
funcall(emacs-wiki-publish-current
"/Users/seth/Notebook/wiki/Plans/TingAgenda"
"/Users/seth/Notebook/web/Plans/TingAgenda.html")
(save-current-buffer (set-buffer temp-buffer) (emacs-wiki-change-project
project) (funcall emacs-wiki-publish-function file published))
(with-current-buffer temp-buffer (emacs-wiki-change-project project) (funcall
emacs-wiki-publish-function file published))
(if debug-on-error (with-current-buffer temp-buffer
(emacs-wiki-change-project project) (funcall emacs-wiki-publish-function file
published)) (condition-case err (with-current-buffer temp-buffer ... ...)
(error ...)))
(unwind-protect (if debug-on-error (with-current-buffer temp-buffer ... ...)
(condition-case err ... ...)) (when (buffer-live-p temp-buffer)
(with-current-buffer temp-buffer ...) (unless debug-on-error ...)))
(let ((temp-buffer ...)) (unwind-protect (if debug-on-error ... ...) (when
... ... ...)))
(emacs-wiki-with-temp-buffer (emacs-wiki-change-project project) (funcall
emacs-wiki-publish-function file published))
(with-emacs-wiki-project project (funcall emacs-wiki-publish-function file
published))
(let ((project emacs-wiki-current-project)) (with-emacs-wiki-project project
(funcall emacs-wiki-publish-function file published)))
(progn (let (...) (with-emacs-wiki-project project ...)) (run-hook-with-args
(quote emacs-wiki-after-file-publish-hook) file) (setq published-some t))
(if (and (not ...) (or force ...)) (progn (let ... ...) (run-hook-with-args
... file) (setq published-some t)))
(when (and (not ...) (or force ...)) (let (...) (with-emacs-wiki-project
project ...)) (run-hook-with-args (quote emacs-wiki-after-file-publish-hook)
file) (setq published-some t))
(while files (setq file (car files) files (cdr files) page
(emacs-wiki-page-name file) published (emacs-wiki-published-file page)) (let
(...) (unless ... ... ...)) (when (and ... ...) (let ... ...)
(run-hook-with-args ... file) (setq published-some t)))
(let ((emacs-wiki-publishing-p t) published-some file page published) (while
files (setq file ... files ... page ... published ...) (let ... ...) (when ...
... ... ...)) published-some)
emacs-wiki-publish-files(("/Users/seth/Notebook/wiki/Plans/TingAgenda") t)
emacs-wiki-publish-this-page()
call-interactively(emacs-wiki-publish-this-page)
execute-extended-command(nil)
call-interactively(execute-extended-command)
_______________________________________________
emacs-wiki-discuss mailing list
emacs-wiki-discuss@nongnu.org
http://lists.nongnu.org/mailman/listinfo/emacs-wiki-discuss
