From 4d62fba7f2d3b57889d5ba3bb34d2118c3f41ed6 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Thu, 25 Feb 2016 08:53:42 -0700
Subject: [PATCH] fix `scribble --redirect-main` with indirect links

---
 scribble-lib/scribble/html-render.rkt | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scribble-lib/scribble/html-render.rkt b/scribble-lib/scribble/html-render.rkt
index dac29bf0..e9d3a5d8 100644
--- a/scribble-lib/scribble/html-render.rkt
+++ b/scribble-lib/scribble/html-render.rkt
@@ -1346,7 +1346,7 @@
              (if (or indirect-link? dest)
                  `((a ([href
                       ,(cond
-                        [(and ext-id external-root-url
+                        [(and ext-id external-root-url dest
                               (let* ([ref-path (relative->path (dest-path dest))]
                                      [rel (if (relative-path? ref-path)
                                               #f