diff options
| author | Ludovic Courtès | 2008-04-21 23:22:16 +0200 |
|---|---|---|
| committer | Ludovic Courtès | 2008-04-21 23:22:16 +0200 |
| commit | 2621b52339e7553db09e9f0e1cae24b695439439 (patch) | |
| tree | bae3ca0328a67a841e5b46d487f2e5cb03d4412c /src | |
| parent | 93b5f21b4a524fc07ea60f20ec363a6c5cfbcdf7 (diff) | |
| download | skribilo-2621b52339e7553db09e9f0e1cae24b695439439.tar.gz skribilo-2621b52339e7553db09e9f0e1cae24b695439439.tar.lz skribilo-2621b52339e7553db09e9f0e1cae24b695439439.zip | |
Document the `context' engine.
* doc/modules/skribilo/documentation/env.scm (*api-engines*): Add `context'. * doc/user/contexte.skb: New file. * doc/user/engine.skb: Include it. * src/guile/skribilo/engine/context.scm (context-customs): Moved to the `make-engine' call so that automatic documentation extraction works.
Diffstat (limited to 'src')
| -rw-r--r-- | src/guile/skribilo/engine/context.scm | 38 |
1 files changed, 16 insertions, 22 deletions
diff --git a/src/guile/skribilo/engine/context.scm b/src/guile/skribilo/engine/context.scm index 970b35f..110431f 100644 --- a/src/guile/skribilo/engine/context.scm +++ b/src/guile/skribilo/engine/context.scm @@ -1,6 +1,6 @@ ;;; context.scm -- ConTeXt engine. ;;; -;;; Copyright 2007 Ludovic Courtès <ludo@chbouib.org> +;;; Copyright 2007, 2008 Ludovic Courtès <ludo@chbouib.org> ;;; Copyright 2004 Erick Gallesio - I3S-CNRS/ESSI <eg@essi.fr> ;;; ;;; @@ -44,26 +44,6 @@ ;;; ====================================================================== -;;; context-customs ... -;;; ====================================================================== -(define context-customs - '((source-comment-color "#ffa600") - (source-error-color "red") - (source-define-color "#6959cf") - (source-module-color "#1919af") - (source-markup-color "#1919af") - (source-thread-color "#ad4386") - (source-string-color "red") - (source-bracket-color "red") - (source-type-color "#00cf00") - (index-page-ref #t) - (image-format ("jpg")) - (font-size 11) - (font-type "roman") - (user-style #f) - (document-style "book"))) - -;;; ====================================================================== ;;; context-encoding ... ;;; ====================================================================== (define context-encoding @@ -418,7 +398,21 @@ :delegate (find-engine 'base) :filter (make-string-replace context-encoding) :symbol-table (context-symbol-table (lambda (m) (format #f "$~a$" m))) - :custom context-customs))) + :custom '((source-comment-color "#ffa600") + (source-error-color "red") + (source-define-color "#6959cf") + (source-module-color "#1919af") + (source-markup-color "#1919af") + (source-thread-color "#ad4386") + (source-string-color "red") + (source-bracket-color "red") + (source-type-color "#00cf00") + ;;(index-page-ref #t) + (image-format ("jpg")) + (font-size 11) + (font-type "roman") + (user-style #f) + (document-style "book"))))) ;;; ====================================================================== ;;; document ... |