When muse-blosxom-use-tags is set to t, argument `category' is a list
and thus (string= category "") will signal an error. The following
patch seems to fix the bug.

diff -u /opt/share/emacs/site-lisp/muse/muse-blosxom.el 
/tmp/buffer-content-31061rCH
--- /opt/share/emacs/site-lisp/muse/muse-blosxom.el     2006-09-19 
01:56:18.000000000 +0100
+++ /tmp/buffer-content-31061rCH        2006-09-25 21:39:40.000000000 +0100
@@ -219,7 +219,7 @@
           (while (progn (setq tag (read-string "Tag (RET to continue): "))
                         (not (string= tag "")))
             (add-to-list 'tags tag t))
-          tags)
+          (mapconcat #'identity tags ","))
       (completing-read "Category: "
                        (mapcar 'list (muse-project-recurse-directory
                                       muse-blosxom-base-directory))))
@@ -237,7 +237,7 @@
   (unless (string= category "")
     (insert
      (if muse-blosxom-use-tags
-         (concat "\n#tags " (mapconcat #'identity category ","))
+         (concat "\n#tags " category)
        (concat "\n#category " category))))
   (insert "\n\n")
   (forward-line 2))

-- 
Leo


_______________________________________________
Muse-el-discuss mailing list
[email protected]
https://mail.gna.org/listinfo/muse-el-discuss

Reply via email to