Removed unused function.

This commit is contained in:
Guillaume Melquiond 2009-07-19 12:16:01 +00:00
parent 240273a4c9
commit 01e7617077

View file

@ -85,18 +85,4 @@ sub raw2postring {
return $str;
}
sub po2rawstring {
my $str = shift;
my @lines = split (/\n/, $str);
$str = "";
foreach my $line (@lines) {
$line =~ m/"(.*)"/;
$str .= $1;
}
$str =~ s/\\n/\n/gm;
return $str;
}
1;