On Wed, Jan 03, 2007 at 06:44:42PM -0500, Michael Olson wrote:
> > How would this functionality be used in conjunction with the
> > "include"-tag?  I.e.
> >
> > <include file="blah.py" markup="???"/>
> 
> I've checked in some additional changes to make this possible.  In
> addition, now attributes other than "file" and "markup" will be passed
> to the function (or tag, in this case) specified by "markup", so you
> can chain things together.
> 
> For example:
> <include file="../Makefile" markup="src" lang="makefile">

Thanks, Michael.  That does the trick!

Unfortunately,

<include file="..." markup="example"/>

no longer works (error message attached).

A further two questions regarding the colour output:

1. How can a person surround your source code in an <example> block
(i.e. bordered with grey background).

2. How can I control the colours used in markup?  Currently, they seem
to depend on the settings of your emacs session (i.e. I run a theme
with dark background and light text, which means the source code is
highlighted to have very light text.  This doesn't work well on the
white backdrop of my webpage.)

Thanks again for implementing this.

Cheers
Stéfan
Debugger entered--Lisp error: (args-out-of-range 2 8)
  match-string(1)
  muse-publish-call-tag-on-buffer("example" nil)
  muse-publish-examplify-buffer(nil)
  muse-publish-include-tag(4553 #<marker at 4553 in  *muse-temp*> (("file" . 
"musemap.py") ("markup" . "example")))
  apply(muse-publish-include-tag (4553 #<marker at 4553 in  *muse-temp*> 
(("file" . "musemap.py") ("markup" . "example"))))
  muse-publish-markup-tag()
  muse-publish-markup("Map" ((1000 "\\(\\`\n+\\|\n+\\'\\)" 0 "") (1100 
"[[:blank:]]+$" 0 "") (1200 "\\`#\\([a-zA-Z-]+\\)\\s-+\\(.+\\)\n+" 0 directive) 
(1300 muse-tag-regexp 0 tag) (1350 "^;\\s-+\\(.+\\)" 0 comment) (1400 
muse-explicit-link-regexp 0 muse-publish-mark-link) (1600 
"\\(^\\|[-[[:blank:]<('`\"\n]\\)\\(=[^=[:blank:]\n]\\|_[^_[:blank:]\n]\\|\\*+[^*[:blank:]\n]\\)"
 2 word) (1700 "^\\(\\*+\\)\\s-+" 0 heading) (1800 "\\.\\.\\.\\." 0 enddots) 
(1850 "\\.\\.\\." 0 dots) (1900 "^----+" 0 rule) (1950 "~~" 0 no-break-space) 
(2000 "^Footnotes:?\\s-*" 0 fn-sep) (2100 "\\[\\([1-9][0-9]*\\)\\]" 0 footnote) 
(2200 
"^[[:blank:]]*\\([[:blank:]]-[[:blank:]]*\\|[[:blank:]][0-9]+\\.[[:blank:]]*\\|\\([^\n[:blank:]].*?\\)?::\\(?:[[:blank:]]+\\|$\\)\\)"
 0 list) (2300 
"\\(\\([[:blank:]]*\n\\)?\\(^.*[[:blank:]]+\\(|+\\)\\(?:[[:blank:]]\\|$\\).*\\(?:\n\\|\\'\\)\\)\\)+"
 0 table) (2400 "^\\([[:blank:]]+\\).+" 0 quote) (2500 
"\\(^\\|[[:blank:]]*\\)--\\($\\|[[:blank:]]*\\)" 0 emdash) (2600 
"^[[:blank:]]*> " 0 verse) (2700 "^\\(\\W*\\)#\\(\\S-+\\)\\s-*" 0 anchor) (2900 
muse-explicit-link-regexp 0 link) (3000 muse-url-regexp 0 url) (3100 
muse-wiki-interwiki-regexp 0 link) (3200 muse-wiki-wikiword-regexp 0 link) 
(3250 muse-wiki-project-file-regexp 0 link) (3300 "''''" 0 "") (3500 
"\\([^[]\\)[EMAIL PROTECTED]([-a-zA-z0-9_]+\\.\\)+[a-zA-Z0-9]+" 0 email) (10000 
"\\(\\(\n\\(?:[[:blank:]]*\n\\)*\\([[:blank:]]*\n\\)\\)\\|\\`\\s-*\\|\\s-*\\'\\)"
 3 muse-html-markup-paragraph)))
  muse-publish-markup-region(1 2396 "Map" (:base "html" :path 
"~/work/public_html/phd-wiki-web" :footer "~/work/phd-wiki/footer.html"))
  muse-publish-markup-buffer("Map" (:base "html" :path 
"~/work/public_html/phd-wiki-web" :footer "~/work/phd-wiki/footer.html"))
  muse-publish-file("/home/stefan/work/phd-wiki/Map.muse" (:base "html" :path 
"~/work/public_html/phd-wiki-web" :footer "~/work/phd-wiki/footer.html") 
"~/work/public_html/phd-wiki-web" nil)
  muse-project-publish-file-default("/home/stefan/work/phd-wiki/Map.muse" 
(:base "html" :path "~/work/public_html/phd-wiki-web" :footer 
"~/work/phd-wiki/footer.html") "~/work/public_html/phd-wiki-web" nil)
  muse-project-publish-file("/home/stefan/work/phd-wiki/Map.muse" ((:base 
"html" :path "~/work/public_html/phd-wiki-web" :footer 
"~/work/phd-wiki/footer.html")) nil)
  muse-project-publish-default(("phdwiki" ("~/work/phd-wiki" :default 
"WelcomePage" :force-publish ("WikiIndex" "Map")) (:base "html" :path 
"~/work/public_html/phd-wiki-web" :footer "~/work/phd-wiki/footer.html")) 
((:base "html" :path "~/work/public_html/phd-wiki-web" :footer 
"~/work/phd-wiki/footer.html")) nil)
  muse-project-publish(("phdwiki" ("~/work/phd-wiki" :default "WelcomePage" 
:force-publish ("WikiIndex" "Map")) (:base "html" :path 
"~/work/public_html/phd-wiki-web" :footer "~/work/phd-wiki/footer.html")) nil)
  call-interactively(muse-project-publish)
_______________________________________________
Muse-el-discuss mailing list
[email protected]
https://mail.gna.org/listinfo/muse-el-discuss

Reply via email to