aboutsummaryrefslogtreecommitdiff
path: root/git-s
diff options
context:
space:
mode:
Diffstat (limited to 'git-s')
-rwxr-xr-xgit-s8
1 files changed, 4 insertions, 4 deletions
diff --git a/git-s b/git-s
index cc560d9..faf55ff 100755
--- a/git-s
+++ b/git-s
@@ -6,12 +6,12 @@ git status -s | perl -ne '
push @{$x{$1}}, $2 if /^(.). (.*)/;
push @{$y{$1}}, $2 if /^.(.) (.*)/;
END {
- delete $x{"?"};
- for ([">" => \%x], ["." => \%y]) {
+ delete $x{"?"}; delete $x{" "}; delete $y{" "};
+ for (["index" => \%x], ["tree" => \%y]) {
($n, $h) = @$_;
+ print "$n:" if values %$h;
for (sort keys %$h) {
- next if $_ eq " ";
- print "$n$_";
+ print " $_ ";
print " $_" for @{$h->{$_}};
print "\n";
}