diff -r fda8655157bf -r b20cc3d58393 releaseAutomation/wikify_bom_fcl_changes.pl --- a/releaseAutomation/wikify_bom_fcl_changes.pl Wed Mar 10 16:09:38 2010 +0000 +++ b/releaseAutomation/wikify_bom_fcl_changes.pl Thu Mar 11 12:35:33 2010 +0000 @@ -22,6 +22,7 @@ my $fcl = undef; my $changeset = undef; my $user = undef; +my $tag = ""; while(my $line = ) { if($line =~ m/(\S+)(\/FCL\/\S+)/i) @@ -29,6 +30,8 @@ my $codeline = $1; my $location = $2; my $root; + $tag = ""; + if ($codeline =~ m/oss/i) { $root = "http://developer.symbian.org/oss" @@ -70,6 +73,18 @@ #changeset: 118:c5817fd289ec $user = $1; } + elsif($line =~ m/^tag:\s+(\S+)/) + { + #changeset: 118:c5817fd289ec + my $preprocessed = $1; + $preprocessed =~ s/^tip$//g; + if($preprocessed =~ m/\S+/) + { + $tag = $tag."\'\'\'".$preprocessed."\'\'\' "; + } + +# $tag = $1." "; + } elsif( defined $fcl) { if($line =~ s/^summary:\s+//) @@ -77,7 +92,7 @@ $line =~ s/\n//; my $bugzilla = "http:\/\/developer.symbian.org\/bugs\/show_bug.cgi?id="; $line =~ s/(bug\s*)(\d+)/\[$bugzilla$2 $1$2\]/gi; - print "|[".$fcl."rev\/".$changeset." ".$changeset."]\n|".$line."\n|-\n"; + print "|[".$fcl."rev\/".$changeset." ".$changeset."]\n|".$tag.$line."\n|-\n"; # print "|[".$fcl."rev\/".$changeset." ".$changeset."]\n|".$user."\n|".$line."\n|-\n"; } #abort: unknown revision 'PDK_3.0.c'!