suzanne.soy/scribble-math
1
0
Fork 0
Code Issues 8 Pull Requests 3 Actions Packages Projects Releases Wiki Activity

Added parameter for cusom KaTeX and MathJax locations

Browse Source
This commit is contained in:
Suzanne Soy 2021-03-27 17:43:22 +00:00
parent 617fbce1ac
commit cc3351f5c1
2 changed files with 66 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

44
dollar.rkt
View File

@ -42,6 +42,10 @@
$$-tex2svg $$-tex2svg
use-tex2svg use-tex2svg
current-tex2svg-path)) current-tex2svg-path))
(define use-external-mathjax (make-parameter #f))
(define use-external-katex (make-parameter #f))
;; KaTeX does not work well with the HTML 4.01 Transitional loose DTD, ;; KaTeX does not work well with the HTML 4.01 Transitional loose DTD,
;; so we define a style modifier which replaces the prefix for HTML rendering. ;; so we define a style modifier which replaces the prefix for HTML rendering.
(define (with-html5 doc-style) (define (with-html5 doc-style)
@ -148,11 +152,11 @@ EOJS
;; <script type="text/x-mathjax-config"> ;; <script type="text/x-mathjax-config">
;; MathJax.Hub.Config({ tex2jax: {inlineMath: [['$','$']]} }); ;; MathJax.Hub.Config({ tex2jax: {inlineMath: [['$','$']]} });
;; </script> ;; </script>
(load-script-string "MathJax/MathJax.js?config=default"))) (load-script-string (or (use-external-mathjax) "MathJax/MathJax.js?config=default"))))
#;(define load-mathjax-code #;(define load-mathjax-code
(string->bytes/utf-8 (string->bytes/utf-8
(string-append (load-script-string "MathJax/MathJax.js?config=default") (string-append (or (use-external-mathjax) "MathJax/MathJax.js?config=default")
#<<EOJS #<<EOJS
(function(f) { (function(f) {
// A "simple" onLoad function // A "simple" onLoad function
@ -202,8 +206,8 @@ EOJS
(define load-katex-code+style (define load-katex-code+style
(string->bytes/utf-8 (string->bytes/utf-8
(string-append (load-style-string "katex/katex.min.css") (string-append (load-style-string (if (use-external-katex) (cadr (use-external-katex)) "katex/katex.min.css"))
(load-script-string "katex/katex.min.js") (load-script-string (if (use-external-katex) (car (use-external-katex)) "katex/katex.min.js"))
#<<EOJS #<<EOJS
(function(f) { (function(f) {
// A "simple" onLoad function // A "simple" onLoad function
@ -269,31 +273,31 @@ EOTEX
(define math-inline-style-mathjax (define math-inline-style-mathjax
(style "math" (style "math"
(list (alt-tag "span") (append (list (alt-tag "span"))
#;(make-css-addition math-inline.css) #;(list (make-css-addition math-inline.css))
(install-resource mathjax-dir) (if (use-external-mathjax) '() (list (install-resource mathjax-dir)))
(js-addition load-mathjax-code) (list (js-addition load-mathjax-code))
'exact-chars))) (list 'exact-chars))))
(define math-display-style-mathjax (define math-display-style-mathjax
(style "math" (style "math"
(list (alt-tag "div") (append (list (alt-tag "div"))
#;(make-css-addition math-inline.css) #;(list (make-css-addition math-inline.css))
(install-resource mathjax-dir) (if (use-external-mathjax) '() (list (install-resource mathjax-dir)))
(js-addition load-mathjax-code) (list (js-addition load-mathjax-code))
'exact-chars))) (list 'exact-chars))))
(define math-inline-style-katex (define math-inline-style-katex
(style "texMathInline" (style "texMathInline"
(list (install-resource katex-dir) (append (if (use-external-katex) '() (list (install-resource katex-dir)))
(js-addition load-katex-code+style) (list (js-addition load-katex-code+style))
'exact-chars))) (list 'exact-chars))))
(define math-display-style-katex (define math-display-style-katex
(style "texMathDisplay" (style "texMathDisplay"
(list (install-resource katex-dir) (append (if (use-external-katex) '() (list (install-resource katex-dir)))
(js-addition load-katex-code+style) (list (js-addition load-katex-code+style))
'exact-chars))) (list 'exact-chars))))
(define math-inline-style-latex (define math-inline-style-latex
(style "texMathInline" (style "texMathInline"

42
scribblings/scribble-math.scrbl
View File

@ -279,6 +279,48 @@ details see the documentation of @racket[with-html5].
This parameter requires Racket 6.12 or later.} This parameter requires Racket 6.12 or later.}
@defparam[use-external-mathjax URL string? #:value #f]{
A parameter whose value is the URL to the MathJax script
to use. The URL must be absolute, or relative to the URL
used to display the document.
For example, if the HTML document is accessed via @tt{
file:///home/user/docs/document1/index.html}, and
@racket[(use-external-mathjax "../common/MathJax/MathJax.js?config=default")] was
used, then MathJax will be loaded from @tt{
file:///home/user/docs/common/MathJax/MathJax.js?config=default}.
An URL to a CDN is also valid, but may be a poor choice
regarding the privacy of your users.
This feature is in beta and might not work, please report
any issue.}
@defparam[use-external-katex URLs (list/c string? string?) #:value #f]{
A parameter whose value is a list containing the URL to the
KaTeX script and the URL to KaTeX CSS to use. The URLs must
be absolute, or relative to the URL used to display the
document.
For example, if the HTML document is accessed via @tt{
file:///home/user/docs/document1/index.html}, and
@racket[(use-external-katex (list "../common/KaTeX/katex.min.js" "../common/KaTeX/katex.min.css"))]
was used, then the KaTeX script will be loaded from @tt{
file:///home/user/docs/common/KaTeX/katex.min.js} and the
KaTeX stylesheet from @tt{
file:///home/user/docs/common/KaTeX/katex.min.css}.
An URL to a CDN is also valid, but may be a poor choice
regarding the privacy of your users.
Please note that using a .js and a .css file which are not
in the same directory is unsupported (it has not been tested
and may or may not work).
This feature is in beta and might not work, please report
any issue.}
@;@$${\sum_{i=0}ⁿ xᵢ³} @;@$${\sum_{i=0}ⁿ xᵢ³}