diff -r dfb7c4ff071f -r 21d2ab05f085 commsfwtools/commstools/svg/parselog.pl --- a/commsfwtools/commstools/svg/parselog.pl Thu Dec 17 09:22:25 2009 +0200 +++ b/commsfwtools/commstools/svg/parselog.pl Thu Jan 07 13:34:53 2010 +0200 @@ -428,17 +428,12 @@ ClearActivity($actAddr); } elsif ($action eq "Abort") { - print "t ", objectName($activityNode{$actAddr}), " (Abort ", $activityName{$actAddr}, ")\n"; + print "t ", objectName($activityNode{$actAddr}), " ($activityName{$actAddr}) Abort()\n"; } - elsif ($action eq "Next->cancel") { - my $tuple = ""; - if (m/\[Triple=([^]]+)\]/) { - $tuple = $1; - print "t ", objectName($activityNode{$actAddr}), " (Cancel $activityName{$actAddr}, $tuple)\n"; - } - else { - print "t ", objectName($activityNode{$actAddr}), " (Cancel ", $activityName{$actAddr}, ")\n"; - } + elsif ($action =~ m/Cancel\(\)/) { + m/iPostedToId ([0-9a-f]{8})/; + my $postedToId = $1; + print "t ", objectName($activityNode{$actAddr}), " ($activityName{$actAddr}) Cancel(). Posted to ", objectName($postedToId), "\n"; } } elsif (($opt_X & 4) == 0 && /UnparkState->unparked\s+\[MNode=0x([0-9a-fA-F]{8})\].*\[Activity=(\w+)\].*\[Triple=(.*?)\]/)