Revert "Adapt tutorial to cygwin and add test case"

[git.git] / git-shortlog.perl

diff --git a/git-shortlog.perl b/git-shortlog.perl
index 107c895df39a9a26ac5eb30f0d45d9e46dc4caaf..8f0984be02c56b23edf4c705fa8a75b95c66edcc 100755 (executable)
--- a/git-shortlog.perl
+++ b/git-shortlog.perl
@@ -108,7 +108,7 @@ sub changelog_input {
                if ($pstate == 1) {
                        my ($email);
 
-                       next unless /^Author: (.*)<(.*)>.*$/;
+                       next unless /^[Aa]uthor:? (.*)<(.*)>.*$/;
        
                        $n_records++;