Correcting type error in latex-match: target-url-addr can be a path, which can't be consumed by regexp-replace
This commit is contained in:
parent
29c83cd254
commit
0a5e92c299
|
@ -388,7 +388,12 @@
|
|||
(let ([v (car l)])
|
||||
(cond
|
||||
[(target-url? v)
|
||||
(printf "\\href{~a}{" (regexp-replace* #rx"%" (target-url-addr v) "\\\\%"))
|
||||
(printf "\\href{~a}{" (regexp-replace* #rx"%"
|
||||
(let ([p (target-url-addr v)])
|
||||
(if (path? p)
|
||||
(path->string p)
|
||||
p))
|
||||
"\\\\%"))
|
||||
(loop (cdr l) #t)
|
||||
(printf "}")]
|
||||
[(color-property? v)
|
||||
|
|
Loading…
Reference in New Issue
Block a user