diff options
Diffstat (limited to 'src/guile/skribilo/package/eq/lout.scm')
| -rw-r--r-- | src/guile/skribilo/package/eq/lout.scm | 14 |
1 files changed, 9 insertions, 5 deletions
diff --git a/src/guile/skribilo/package/eq/lout.scm b/src/guile/skribilo/package/eq/lout.scm index 577f6da..ce478f7 100644 --- a/src/guile/skribilo/package/eq/lout.scm +++ b/src/guile/skribilo/package/eq/lout.scm @@ -44,7 +44,7 @@ (engine-custom-set! lout 'includes (string-append includes "\n" "@SysInclude { " - (if (*use-lout-eq2?*) "eq2" "eq") + (if (*use-lout-math?*) "math" "eq") " }\n"))))) @@ -71,8 +71,12 @@ (display "{ "))) :action (lambda (node engine) (display (if (inline-equation? node) - "@OneRow @OneCol @E { " - "@Eq { ")) + (if (*use-lout-math?*) + "@M { " + "@OneRow @OneCol @E { ") + (if (*use-lout-math?*) + "@Math { " + "@Eq { "))) (let ((eq (markup-body node))) ;;(fprint (current-error-port) "eq=" eq) (output eq engine))) @@ -240,7 +244,7 @@ (var (markup-option node :var)) (limit (markup-option node :limit))) (format #t "{ lim ~a { { " - (if (*use-lout-eq2?*) + (if (*use-lout-math?*) "atop @SubScriptStyle" "from")) (output var engine) @@ -273,7 +277,7 @@ (to (markup-option node :to)) (body (markup-body node))) (display ,(string-append " { " - (if (*use-lout-eq2?*) + (if (*use-lout-math?*) "" "big ") lout-name |