Skip to content
Browse files

Handle Imports

They happen fairly frequently on ports so we want to show useful things.
  • Loading branch information...
1 parent 79a280d commit c3c4fc2912ac9eef976ab8c5a0359d6bc3a2fbae @afresh1 committed Jul 8, 2012
Showing with 15 additions and 2 deletions.
  1. +15 −2 commits-to-twitter.pl
View
17 commits-to-twitter.pl
@@ -214,12 +214,16 @@ sub parse_commit {
next;
}
- if (/(CVSROOT|Module name|Changes by):\s+(.*)$/) {
+ if (/(CVSROOT|Module name|Changes by|Release Tags):\s+(.*)$/) {
$commit{$1} = $2;
next;
}
return unless $commit{CVSROOT}; # first thing should be CVSROOT
+ if (/^\s*N\s+(.*)\/([^\/]+)/) {
+ push @{ $commit{'Imported files'}{$1} }, $2;
+ }
+
if (/^(Update of)\s+(.*)\/([^\/]+)$/) {
$commit{'Updated files'}{$2} = [$3];
next;
@@ -241,10 +245,19 @@ sub parse_commit {
next unless $dir;
push @{ $commit{$key}{$dir} }, @files;
+ next;
}
if (/^Log [Mm]essage:/) {
- $commit{'Log message'} .= $_ while <$fh>;
+ while (<$fh>) {
+ if (/^\s*Vendor Tag:\s+(.*)$/) {
+ $commit{'Vendor Tag'} = $1;
+ $commit{'Log message'} =~ s/\s*Status:\s*$//ms;
+ last;
+ }
+ $commit{'Log message'} .= $_;
+ }
+ next;
}
}
close $fh;

0 comments on commit c3c4fc2

Please sign in to comment.
Something went wrong with that request. Please try again.