diff --git a/lib/chibi/net/http-server.scm b/lib/chibi/net/http-server.scm
index c320ab36..1b197bb6 100644
--- a/lib/chibi/net/http-server.scm
+++ b/lib/chibi/net/http-server.scm
@@ -94,7 +94,8 @@
     => (lambda (index-file)
          ;; Generate and restart a new request with explicit index file.
          (let* ((uri (request-uri request))
-                (path2 (make-path (uri-path uri) index-file)))
+                (path2 (make-path (uri-path uri)
+                                  (path-strip-directory index-file))))
            (restart
             (request-with-uri request (uri-with-path uri path2))))))
    (else