From ac87cfb21cfbb081248a428abd03d4095f70747a Mon Sep 17 00:00:00 2001 From: Tom Willemsen Date: Sun, 1 Jul 2012 01:50:55 +0200 Subject: Reserve 15 columns for names Align data about a repository at 15 characters, for now. Looks a little bit cleaner. --- gitto/main.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gitto/main.scm b/gitto/main.scm index e6624e4..600ddc5 100644 --- 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)) -- cgit v1.2.3-54-g00ecf