Changeset 15448 in project


Ignore:
Timestamp:
08/13/09 20:50:02 (10 years ago)
Author:
sjamaan
Message:

Code definition conversion rules

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/4/qwiki/trunk/qwiki-sxml.scm

    r15442 r15448  
    7373  `((
    7474     (@ *preorder* . ,(lambda element element))
     75
     76     (definition
     77       *macro*
     78       . ,(lambda (_ type . contents)
     79            `(div (@ (class ,(conc "definition " type)))
     80                  (em "[" ,(symbol->string type) "]")
     81                  (code ,@contents))))
    7582     
    7683     (Header
Note: See TracChangeset for help on using the changeset viewer.