[emacs-wiki-discuss] error on publish

[Sebastian Luque]

Hi,

Sometime in the last couple of weeks I started getting the following error
when I publish my pages:

*emacs-wiki-temp*: Error occurred: (wrong-type-argument number-or-marker-p nil)

which when toggling debug on error gives the backtrace:

,-----
| Debugger entered--Lisp error: (wrong-type-argument number-or-marker-p nil)
|   min(nil nil)
|   (table--at-cell-p (min beg end))
|   (and (table--at-cell-p (min beg end)) (save-excursion (let ... ...)))
|   table--region-in-cell-p(nil nil)
|   delete-region(nil nil)
|   (let (block-start block-end) (delete-region (match-beginning 4) (match-end 
4)) (if (< ... 6) (setq block-start "<blockquote>\n<p>" block-end 
"</p>\n</blockquote>") (if emacs-wiki-xhtml-inline-css ... ...)) 
(emacs-wiki-surround-text (format "%s\n%s" block-start ws) (format "\n%s\n" 
block-end) (quote emacs-wiki-forward-paragraph)))
|   (progn (let (block-start block-end) (delete-region ... ...) (if ... ... 
...) (emacs-wiki-surround-text ... ... ...)))
|   (if (save-excursion (forward-line) (or ... ...)) (progn (let ... ... ... 
...)))
|   (when (save-excursion (forward-line) (or ... ...)) (let (block-start 
block-end) (delete-region ... ...) (if ... ... ...) (emacs-wiki-surround-text 
... ... ...)))
|   (let ((ws ...)) (when (save-excursion ... ...) (let ... ... ... ...)))
|   (if (null (match-string 2)) (let (...) (when ... ...)) (let (...) (cond ... 
... ...)))
|   emacs-wiki-markup-list-or-paragraph()
|   funcall(emacs-wiki-markup-list-or-paragraph)
|   (cond ((functionp replacement) (funcall replacement)) ((symbolp 
replacement) (symbol-value replacement)) (t replacement))
|   (let ((text ...)) (when text (condition-case nil ... ...)))
|   (if (get-text-property (match-beginning group) (quote read-only)) nil (let 
(...) (when text ...)))
|   (unless (get-text-property (match-beginning group) (quote read-only)) (let 
(...) (when text ...)))
|   (while (and regexp (setq pos ...)) (if verbose (message "Publishing 
%s...%d%%" ... ...)) (unless (get-text-property ... ...) (let ... ...)) (if 
(and last-pos ...) (if ... ... ...)) (setq last-pos pos))
|   (let ((regexp ...) (group ...) (replacement ...) last-pos pos) (if (symbolp 
regexp) (setq regexp ...)) (if verbose (message "Publishing %s...%d%%" ... 
...)) (while (and regexp ...) (if verbose ...) (unless ... ...) (if ... ...) 
(setq last-pos pos)))
|   (if (functionp (car rules)) (funcall (car rules)) (let (... ... ... 
last-pos pos) (if ... ...) (if verbose ...) (while ... ... ... ... ...)))
|   (while rules (goto-char (point-min)) (if (functionp ...) (funcall ...) (let 
... ... ... ...)) (setq rules (cdr rules) base (+ base ...)))
|   (let* ((emacs-wiki-meta-http-equiv emacs-wiki-meta-http-equiv) 
(emacs-wiki-current-page-title title) emacs-wiki-current-page-date 
(emacs-wiki-publishing-p t) (case-fold-search nil) (inhibit-read-only t) (rules 
...) (limit ...) (verbose ...) (base 0) (emacs-wiki-meta-content ...)) 
(run-hooks (quote emacs-wiki-before-markup-hook)) (while rules (goto-char ...) 
(if ... ... ...) (setq rules ... base ...)) (run-hooks (quote 
emacs-wiki-after-markup-hook)) (if verbose (message "Publishing %s...done" 
...)))
|   emacs-wiki-replace-markup()
|   (if (string-match emacs-wiki-image-regexp (emacs-wiki-page-name)) nil 
(emacs-wiki-replace-markup))
|   (unless (string-match emacs-wiki-image-regexp (emacs-wiki-page-name)) 
(emacs-wiki-replace-markup))
|   (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("/home/sluque/Plans/BelugaPostdocProject" 
"/home/sluque/www/WebWiki/BelugaPostdocProject.html")
|   funcall(emacs-wiki-publish-current 
"/home/sluque/Plans/BelugaPostdocProject" 
"/home/sluque/www/WebWiki/BelugaPostdocProject.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(("/home/sluque/Plans/BelugaPostdocProject") t)
|   emacs-wiki-publish-this-page()
|   (let ((emacs-wiki-publishing-p t) (emacs-wiki-after-wiki-publish-hook ...)) 
(emacs-wiki-publish-this-page))
|   (if emacs-wiki-publishing-p nil (let (... ...) 
(emacs-wiki-publish-this-page)))
|   (unless emacs-wiki-publishing-p (let (... ...) 
(emacs-wiki-publish-this-page)))
|   (progn (unless emacs-wiki-publishing-p (let ... ...)))
|   (if (derived-mode-p (quote emacs-wiki-mode)) (progn (unless 
emacs-wiki-publishing-p ...)))
|   (when (derived-mode-p (quote emacs-wiki-mode)) (unless 
emacs-wiki-publishing-p (let ... ...)))
|   sl-emacs-wiki-auto-publish()
|   run-hooks(after-save-hook)
|   basic-save-buffer()
|   save-buffer(1)
|   call-interactively(save-buffer)
`-----

Can this be related to table.el code?  I'm using the latest development
versions of planner and emacs-wiki from Sacha's repository.

Somebody reported the same error message, but it was related to
planner-muse, IIRC.

Thanks in advance for any pointers,

-- 
Sebastian P. Luque