fix scribble/jfp
This commit is contained in:
parent
5edbe0fc85
commit
0ca977aecd
|
@ -41,7 +41,9 @@
|
|||
"\\let\\amalg\\relax\n"))
|
||||
(scribble-file "jfp/style.tex")
|
||||
(list cls-file)
|
||||
#f))
|
||||
#f
|
||||
#:replacements
|
||||
(hash "scribble-load-replace.tex" (scribble-file "jfp/replacements.tex"))))
|
||||
|
||||
(unless (or (not (path? cls-file))
|
||||
(file-exists? cls-file))
|
||||
|
|
1
scribble-lib/scribble/jfp/replacements.tex
Normal file
1
scribble-lib/scribble/jfp/replacements.tex
Normal file
|
@ -0,0 +1 @@
|
|||
\renewcommand{\packageRelsize}{}
|
|
@ -21,7 +21,8 @@
|
|||
|
||||
(define (add-defaults doc pfx styl extras version?
|
||||
#:html [html #f]
|
||||
#:properties [properties null])
|
||||
#:properties [properties null]
|
||||
#:replacements [replacements #F])
|
||||
(struct-copy part doc [style (make-style (style-name (part-style doc))
|
||||
((if version? add-property (lambda (x y z) x))
|
||||
(add-property
|
||||
|
@ -32,9 +33,15 @@
|
|||
html-defaults?
|
||||
html)
|
||||
latex-defaults?
|
||||
(make-latex-defaults
|
||||
pfx
|
||||
styl
|
||||
extras))
|
||||
(if replacements
|
||||
(make-latex-defaults+replacements
|
||||
pfx
|
||||
styl
|
||||
extras
|
||||
replacements)
|
||||
(make-latex-defaults
|
||||
pfx
|
||||
styl
|
||||
extras)))
|
||||
document-version?
|
||||
(make-document-version (version))))]))
|
||||
|
|
Loading…
Reference in New Issue
Block a user