From 08e95b5730fecc35d4a390db290ff805f9783cd8 Mon Sep 17 00:00:00 2001
From: bar <bar@regulator.space.revspace.nl>
Date: Tue, 26 Apr 2011 19:59:04 +0200
Subject: [PATCH] Irritante melding wegwerken

---
 revbank | 8 ++------
 1 file changed, 2 insertions(+), 6 deletions(-)

diff --git a/revbank b/revbank
index cc673f0..0a005ce 100755
--- a/revbank
+++ b/revbank
@@ -125,12 +125,8 @@ sub now {
 
 sub git_commit {
     my ($message) = @_;
-    open my $pipe, '-|', 
-        qw(git commit -q revbank.accounts .revbank.undo), -m => $message
-        or die $!;
-    1 while readline $pipe;  # /dev/null, maar dan anders
-    close $pipe;
-    system qw(git push -q bar.git);
+    system qw(git commit -q revbank.accounts .revbank.undo), -m => $message;
+    system "git push -q bar.git 2>&1 | grep -v 'Unpacking objects' >&2"
 }
 
 sub parse_product {