am: fix stgit patch mangling

diff --git a/git-am.sh b/git-am.sh
index 0ff1f577a33ccc96adfbb14fa35adfeee9e309f5..3afa92b85ae3a0b73e6b6798dd2f6799536d3c03 100755 (executable)
--- a/git-am.sh
+++ b/git-am.sh
@@ -229,7 +229,7 @@ split_patches () {
                        perl -ne 'BEGIN { $subject = 0 }
                                if ($subject > 1) { print ; }
                                elsif (/^\s+$/) { next ; }
-                               elsif (/^Author:/) { print s/Author/From/ ; }
+                               elsif (/^Author:/) { s/Author/From/ ; print ;}
                                elsif (/^(From|Date)/) { print ; }
                                elsif ($subject) {
                                        $subject = 2 ;