bkyk8rc3zvpnsf5inmcqq4n3k98cv6hj-my-site-hyper-literate-git.test.suzanne.soy-0.0.1

commit ce8852492a09be17bb9181a71c7068090e39c8e2
parent 28126e24f5a76fcedf7de1c997c2e39c5952a3fa
Author: Jacob Matthews <jacobm@cs.uchicago.edu>
Date:   Sun,  4 May 2008 07:15:28 +0000

fixed bug that crashed multi-part html doc generation in unusual circumstances

svn: r9638

original commit: 464154f1474bcb820c1af4723afba4d0ec938c4e

Diffstat:
M
collects/scribble/html-render.ss
 | 
4
++--

1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/collects/scribble/html-render.ss b/collects/scribble/html-render.ss
@@ -964,8 +964,8 @@
       (define/override (get-suffix) #"")
 
       (define/override (get-dest-directory)
-        (or (build-path (or (super get-dest-directory) (current-directory))
-                        (current-subdirectory))
+        (or (and (current-subdirectory)
+                 (build-path (or (super get-dest-directory) (current-directory)) (current-subdirectory)))
             (super get-dest-directory)))
 
       (define/override (derive-filename d)