[emacs-wiki-discuss] Re: <lisp> ... </lisp> in muse

[Stefan Reichör]

Hi Jim!

>>>>>> Michael Olson <address@hidden> writes:
>
>> Michael Olson <address@hidden> writes:
>>> Stefan Reichör <address@hidden> writes:
>>> 
>>>> I suspect, that the <lisp> tags are no longer evaluated in muse.
>>>> Is there a configuration setting to turn that evaluation on?
>>>> 
>>>> Or is that feature not yet implemented?
>>> 
>>> I haven't yet implemented that feature.
>
>> To clarify: the contents of <lisp> tags will be published correctly,
>> but not interpreted in Emacs, like with old Planner/emacs-wiki.
>
> Don't you just have to do 
>
> (defun muse-colors-lisp-tag (beg end)
>   (muse-unhighlight-region beg end)
>   (add-text-properties
>    beg end
>    (list 'font-lock-multiline t
>          'display (muse-eval-lisp
>                    (buffer-substring-no-properties (+ beg 6)
>                                                    (- end 7)))
>                'intangible t)))
>
>
> And then modify muse-colors-tags
>
> (setq muse-colors-tags (delete (assoc "lisp" muse-colors-tags) 
> muse-colors-tags))
> (push '("lisp" t nil muse-colors-lisp-tag) muse-colors-tags)
>
>
> Or are there some niceties that I have missed?

Thanks for your idea. But it does not work for me.

I tried it with the following buffer content:

<lisp>(+ 3 4)</lisp>


* When I use emacs-wiki-mode: 7 is displayed
* With emacs-muse the whole line is shown


Does it work for you with the function you have proposed?


Stefan.