This is a nicer fix for git-shortlog being unable to handle the raw log format. Just use a more permissive regexp instead of doing two nearly identical ones.
Signed-off-by: Linus Torvalds <torvalds@osdl.org> ---
diff --git a/git-shortlog.perl b/git-shortlog.perl --- 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++;