X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=scratchy.git;a=blobdiff_plain;f=examples%2Fbrowse-git.scm;fp=examples%2Fbrowse-git.scm;h=f9cd019be64396cfe855ab4375d794c8ae27e9d9;hp=a5d9e7f6ab049fc06b28af0e63bbeb761e4a9fb5;hb=6b465462acb32e21a55623d906dd338983131b2d;hpb=0c9bb3bc20b37663004e37a3a3a69747f5acb326

diff --git a/examples/browse-git.scm b/examples/browse-git.scm
index a5d9e7f..f9cd019 100755
--- a/examples/browse-git.scm
+++ b/examples/browse-git.scm
@@ -55,7 +55,8 @@
                 (list (if (eq? type 'tree) 1 0)
                       file
                       (conc "browse-git.scm|" type "|" repo "|" branch "|"
-                            file-path))))
+                            file-path
+                            (if (eq? type 'tree) "/" "")))))
             entries))))
 
   (define (serve-blob)