Dear planners,
When using planner and muse in Xemacs Beta version 21.5.27 of May 2006 on FC6,
I experience similar problems to those reported below:
-[[https://mail.gna.org/public/planner-el-discuss/2006-11/msg00029.html][Planner-el-discuss:
Problem publishing planner to HTML]]
-[[https://mail.gna.org/public/planner-el-discuss/2006-10/msg00029.html][Planner-el-discuss:
tla muse and Planner Publishing]]
I started with latest gna releases, after reading the first tread, updated to
the 2006.11.26 development snaphsots of muse, planner, and remember at
http://www.mwolson.org/static/dist/ ; xemacs still goes to 100% CPU usage when
I issue a =muse-project-publish=. When I kill xemacs, I get the backtrace below.
I have tried =muse-publish-this-file= on a file that does not contain a *Notes
section, it works fine. A single note causes the infinite loop. I think the
problem boils down to the note-tags, but I can't figure out how to solve it.
Any help is appreciated.
BR,
-- cumhur
<example>
Lisp backtrace follows:
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# bind ([EMAIL PROTECTED] plans]$ newstr literal newtext regexp str)
replace-in-string("" "" "" t)
# bind (literal fixedcase text replacement regexp)
planner-replace-regexp-in-string("" "" "" t t)
# bind (anchor timestamp link categories)
# (unwind-protect ...)
# bind (attrs end beg)
planner-publish-note-tag(2402 #<marker at 3710 in *muse-temp* 0xa3b96b4>
(("anchor" . "3") ("timestamp") ("\"\"") ("link") ("\"\"") ("categories")
("\"\"")))
apply(planner-publish-note-tag (2402 #<marker at 3710 in *muse-temp*
0xa3b96b4> (("anchor" . "3") ("timestamp") ("\"\"") ("link") ("\"\"")
("categories") ("\"\""))))
# bind (muse-inhibit-style-tags args closed-tag start beg end attrs tag-info)
muse-publish-markup-tag()
# bind (func regexp group repl pos base verbose limit inhibit-read-only
case-fold-search rules name)
muse-publish-markup("2006.11.24" ((1000 "\\(\\`\n+\\|\n+\\'\\)" 0 "") (1100
"[ ]+$" 0 "") (1200 "\\`#\\([a-zA-Z-]+\\)\\s-+\\(.+\\)\n+" 0 directive)
(1275 "^#\\([A-C]\\)\\([0-9]*\\)\\s-*\\([_oXDCP]\\)\\s-*\\(.+\\)" 0 task)
(1280 "^\\.#[0-9]+\\s-*" 0 note) (1300 muse-tag-regexp 0 tag) (1350
"^;\\s-+\\(.+\\)" 0 comment) (1400 muse-explicit-link-regexp 0
muse-publish-mark-link) (1600 "\\(^\\|[-[ <('`\"\n]\\)\\(=[^=
\n]\\|_[^_ \n]\\|\\*+[^* \n]\\)" 2 word) (1700 "^\\(\\*+\\)\\s-+" 0
heading) (1800 "\\.\\.\\.\\." 0 enddots) (1850 "\\.\\.\\." 0 dots) (1900
"^----+" 0 rule) (1950 "~~" 0 no-break-space) (2000 "^Footnotes:?\\s-*" 0
fn-sep) (2100 "\\[\\([1-9][0-9]*\\)\\]" 0 footnote) (2200 "^[ ]*\\([
]-[ ]*\\|[ ][0-9]+\\.[ ]*\\|\\([^\n ].*?\\)?::\\(?:[
]+\\|$\\)\\)" 0 list) (2300 "\\(\\([ ]*\n\\)?\\(^.*[
]+\\(|+\\)\\(?:[ ]\\|$\\).*\\(?:\n\\|\\'\\)\\)\\)+" 0 table) (2400
"^\\([ ]+\\).+" 0 quote) (2500 "\\(^\\|[ ]*\\)--\\($\\|[ ]*\\)" 0
emdash) (2600 "^[ ]*> " 0 verse) (2700 "^\\(\\W*\\)#\\(\\S-+\\)\\s-*" 0
anchor) (2900 muse-explicit-link-regexp 0 link) (3000 muse-url-regexp 0 url)
(3200 planner-date-regexp 0 link) (3500
"\\([^[]\\)[EMAIL PROTECTED]([-a-zA-z0-9_]+\\.\\)+[a-zA-Z0-9]+" 0 email)
(10000 "\\(\\(\n\\(?:[ ]*\n\\)*\\([
]*\n\\)\\)\\|\\`\\s-*\\|\\s-*\\'\\)" 3 muse-html-markup-paragraph)))
# (unwind-protect ...)
# bind (style title end beg)
muse-publish-markup-region(1 4556 "2006.11.24" (:base "planner-xhtml" :path
"~/html/public_html/wiki"))
# bind (style-header style-footer muse-publishing-current-style
muse-publishing-directives muse-publishing-p inhibit-read-only style title)
muse-publish-markup-buffer("2006.11.24" (:base "planner-xhtml" :path
"~/html/public_html/wiki"))
# (unwind-protect ...)
byte-code("..." [target backup-inhibited temp-buffer output-path style file
insert-file-contents muse-publish-markup-buffer muse-page-name t write-file
muse-style-run-hooks :final] 6)
# (condition-case ... . ((error (byte-code "��!����ÀĀ� #� �〓〓〓�
#!�" [muse-batch-publishing-p err boundp message "%s: Error occured:
%s" muse-page-name backtrace muse-display-warning format "An error occurred
while publishing %s: %s\n\nSet debug-on-error to `t' if you would like a
backtrace."] 5))))
# (unwind-protect ...)
# bind (temp-buffer threshhold target muse-publishing-current-output-path
muse-publishing-current-file output-suffix output-path force output-dir style
file)
muse-publish-file("/home/cerkut/Project/plans/2006.11.24.muse" (:base
"planner-xhtml" :path "~/html/public_html/wiki") "~/html/public_html/wiki" nil)
# bind (output-dir muse-current-output-style --dolist-temp--21709 style
published ignore-regexp force styles file)
muse-project-publish-file("/home/cerkut/Project/plans/2006.11.24.muse"
((:base "planner-xhtml" :path "~/html/public_html/wiki")) nil)
# bind (--dolist-temp--21710 pair forced-files file-alist styles
muse-current-project published force project)
#<compiled-function (project &optional force) "...(202)"
[--dolist-temp--21710 pair forced-files value styles project
muse-project-of-file assoc signal muse-assertion-failed (consp project) nil
muse-publish-get-style error "Cannot find a project to publish"
muse-project-save-buffers run-hook-with-args muse-before-project-publish-hook
:force-publish muse-project-file-alist muse-project-publish-file delete t
muse-after-project-publish-hook message "All pages in %s have been published."
"No pages in %s need publishing at this time." --dolist-temp--21711 published
file-alist file muse-current-project direct list muse-project-alist keyword
force] 6 ("/home/cerkut/.xemacs/xemacs-packages/lisp/muse/muse-project.elc" .
19828) (list (muse-read-project "Publish project: " nil t)
current-prefix-arg)>(("WikiPlanner" ("~/Project/plans" :default "TaskPool"
:major-mode planner-mode :visit-link planner-visit-link) (:base
"planner-xhtml" :path "~/html/public_html/wiki")) nil)
call-interactively(muse-project-publish)
# (condition-case ... . error)
# (catch top-level ...)
</example>
_______________________________________________
Planner-el-discuss mailing list
[email protected]
https://mail.gna.org/listinfo/planner-el-discuss