--- topic-diff.pl.orig 2004-02-02 08:11:24.000000000 +0100 +++ scripts/topic-diff.pl 2006-10-09 15:57:51.000000000 +0200 @@ -30,8 +30,10 @@ # $server->print ($channel, $server->{tag}); if ($topics{$server->{tag}."_".$channel}) { - my @original = split /\s*\|\s*/, $topics{$server->{tag}."_".$channel}; - my @modified = split /\s*\|\s*/, $topic; + $topics{$server->{tag}."_".$channel} =~ s/^ +| +$//g; + $topic =~ s/^ +| +$//g; + my @original = split /\s*\|\s*|\s+-\s+/, $topics{$server->{tag}."_".$channel}; + my @modified = split /\s*\|\s*|\s+-\s+/, $topic; outer: while( $i <= $#original) {