diff --git a/main.scm b/main.scm
index 95ef505..37caed1 100755
--- a/main.scm
+++ b/main.scm
@@ -191,7 +191,7 @@
     (else
      (if (git-file-is-text? source-file)
          (plaintext)
-         (binary))))
+         (binary)))))
 
 (define (filelist->sxml source-files-list relative-root)
   `((h1 "Files")