Reserve 15 columns for names

Align data about a repository at 15 characters, for now. Looks a little bit cleaner.
ryuslash · Jun 30, 2012 · ac87cfb · ac87cfb
1 parent d7a622d
commit ac87cfb
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/gitto/main.scm b/gitto/main.scm
@@ -96,7 +96,7 @@ gitto [options]
               (let ((numup (git-revs-to-push))
                     (numdown (git-revs-to-pull))
                     (clean? (git-clean?)))
-                (format #t "~a: ~d to push, ~d to pull and is ~adirty.\n"
+                (format #t "~a:~15t~d to push, ~d to pull and is ~adirty.\n"
                         (basename repo) numup numdown
                         (if clean? "not " ""))))
             repositories))