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

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

Re: [emacs-wiki-discuss] Re: menus again


From: Marc Tommasi
Subject: Re: [emacs-wiki-discuss] Re: menus again
Date: Tue, 14 Sep 2004 16:29:58 +0200
User-agent: Mozilla Thunderbird 0.7.3 (X11/20040803)

I've tried, but I obtain quotes (") replaced by the entity &quot; and > replaced by &lt; and the php code in a <pre> </pre> tag.
Of course the php code could not be interpreted...



Michael Olson wrote:

Try the following:

(defun mt-write-menu (menu)
  (when emacs-wiki-publishing-p
    (let (str)
      (while menu
        (setq str (concat str
                         "$menu[] = array(\"texte\"=>\"" (car(car menu))
                         "\",\"url\"=>\"" (cadr(car menu))
                         "\",\"bulle\"=>\"" (caddr(car menu))
                         "\");\n"
                         ))     
        (setq menu (cdr menu))
        )
      (concat "<example><?\n" str "\n  display_menu($menu);\n?></example>")
    )
  )
)

This puts the <example> tag around your output, which keeps Emacs Wiki
from interpreting it any further and preserves whitespace.  The
<example> tag will go away when you view the published page.



_______________________________________________
emacs-wiki-discuss mailing list
address@hidden
http://lists.nongnu.org/mailman/listinfo/emacs-wiki-discuss


--
Marc Tommasi         --- http://www.grappa.univ-lille3.fr/~tommasi
UFR MSES Univ. de Lille 3  59653 Villeneuve d'Ascq cedex  -- FRANCE
Phone:(+33)320416175 --- Fax:(+33)320416770
--
N'ajoutez pas mon email dans votre carnet d'adresses Outlook SVP.
Please do not add my email in your Outlook addressbook.





reply via email to

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