fix default external-URL redirection

Use an installation's current configuration and get a corrected default by using `setup/dirs`.
2016-02-25 08:49:22 -07:00 · 2016-02-25 08:49:22 -07:00 · 17acde5a1f
commit 17acde5a1f
parent 58b662ab77
1 changed files with 1 additions and 1 deletions
--- a/scribble-lib/scribble/html-render.rkt
+++ b/scribble-lib/scribble/html-render.rkt
@ -1378,7 +1378,7 @@
                         ;; Redirected to search:
                         (url->string*
                          (let ([u (string->url (or external-tag-path
-                                                    "http://doc.racket-lang.com/"))])
+                                                    (get-doc-search-url)))])
                            (struct-copy
                             url
                             u