Le 26 octobre à 16:55:09 Phillip Lord <[EMAIL PROTECTED]> écrit notamment:
| >>>>> "JMdB" == Jean Magnan de Bornier <[EMAIL PROTECTED]> writes:
>
| JMdB> I just define a new style for each project, like so...
| >>
| >>
| JMdB> (muse-derive-style "bioont-06-xhtml" "html" :header
>
| JMdB> Thanks! For header and footer it works; I tried to add a line:
| JMdB> :extension ".php"
>
| Yeah, I've had this working. This comes from something I wrote
>
| ;; define an ht style.
| (muse-derive-style "ht" "html"
| :after 'muse-ht-finalize-buffer
| :strings 'muse-ht-markup-strings
| :browser 'muse-ht-browse-file
| :suffix 'muse-ht-extension
| :header 'muse-ht-header
| :footer 'muse-ht-footer)
|
| (defvar muse-ht-extension ".ht")
>
| Haven't used this for ages, but I assume that it is still working. I
| can't remember whether I passed in the variable for completeness or
| because it needs a variable. Anyway, you might try this
>
| (setq blah-extension ".blah")
>
| (muse-derive-style "blah" "blah"
| :suffix 'blah-extension)
>
>
| if the simpler
>
| (muse-derive-style "blah" "blah"
| :suffix ".php")
>
| doesn't work.
>
OK I have it working now, with:
(setq bloc-extension ".php")
(muse-derive-style "bloc" "journal-html"
:header "~/.muse/bloc/haut"
:footer "~.muse/bloc/bas"
:suffix 'bloc-extension
)
(setq muse-project-alist
'(("Papiers"
("~/Papiers" :default "nouveau")
(:base "html" :path "~/Papiers/html")
(:base "latex" :path "~/Papiers/latex")
(:base "pdf" :path "~/Papiers/latex"))
("blog" ; ou site univ
("~/journal" :default "index")
(:base "bloc" :path "~/journal/bloc-notes")
(:base "journal-rdf" :path "~/journal/bloc-notes"))
))
Thanks a lot!
--
Jean Magnan de Bornier | Cours Victor Hugo
e-mots: jean at bornier.net | 13980 Alleins France
T 08 70 39 34 03 | P 06 09 17 35 87
_______________________________________________
Muse-el-discuss mailing list
[email protected]
https://mail.gna.org/listinfo/muse-el-discuss
