bitlair/revbank
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Probeersel

Browse source
This commit is contained in:
bar 2011-04-26 19:53:15 +02:00
parent 296ca0b7d4
commit fa1010d9a0
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
revbank
View file

@ -125,7 +125,11 @@ sub now {
sub git_commit {
my ($message) = @_;
system qw(git commit -q revbank.accounts .revbank.undo), -m => $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);
}