emacs-wiki-discuss
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[emacs-wiki-discuss] muse title publishing problem


From: Neilen Marais
Subject: [emacs-wiki-discuss] muse title publishing problem
Date: Wed, 18 Jan 2006 08:41:00 +0200

Hi

Using address@hidden/muse--main--1.0--patch-355 and earlier (I
tried down to patch 280) with XEmacs 21.4.17, I get this rendered on a
seemingly random selection of pages:

(let ((maintainer (muse-style-element :maintainer))) (when maintainer
(concat ""))) muse-html-style-sheet 
(concat (muse-publishing-directive "title") (let ((author
(muse-publishing-directive "author"))) (if (not (string= author
(user-full-name))) (concat " (by " author ")"))))

The HTML source looks like this:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
  <head>
    <title><lisp>
  (concat (muse-publishing-directive "title")
          (let ((author (muse-publishing-directive "author")))
            (if (not (string= author (user-full-name)))
                (concat " (by " author ")"))))</lisp></title>
    <meta name="generator" content="muse.el">
    <meta http-equiv="<lisp>muse-html-meta-http-equiv</lisp>"
          content="<lisp>muse-html-meta-content-type</lisp>">
    <lisp>
      (let ((maintainer (muse-style-element :maintainer)))
        (when maintainer
          (concat "<link rev=\"made\" href=\"" maintainer \>")))
    </lisp>
    <lisp>muse-html-style-sheet</lisp>
  </head>
  <body>
    <h1><lisp>
  (concat (muse-publishing-directive "title")
          (let ((author (muse-publishing-directive "author")))
            (if (not (string= author (user-full-name)))
                (concat " (by " author ")"))))</lisp></h1>
    <!-- Page published by Emacs Muse begins here -->

I attach the source file that creates the problem. I realise the lists
are still in muse-incompatible form, but this should not affect the
title I think.

Thanks
Neilen


Attachment: ChickPeaTomatoSoup.muse
Description: Text document


reply via email to

[Prev in Thread] Current Thread [Next in Thread]