Scribble support for redirecting external links and re-rooting corss-reference paths
svn: r9448 original commit: 931d93ba2fbe45bf5c91fe8dd90983e2ea2322bb
This commit is contained in:
parent
e523655315
commit
8e0be36cc7
|
@ -72,7 +72,7 @@
|
|||
[sa string-append])
|
||||
(when (and (equal? scheme "file")
|
||||
(not (url-path-absolute? url)))
|
||||
(raise-mismatch-error "url->string"
|
||||
(raise-mismatch-error 'url->string
|
||||
"cannot convert relative file URL to a string: "
|
||||
url))
|
||||
(sa (if scheme (sa scheme ":") "")
|
||||
|
|
Loading…
Reference in New Issue
Block a user