Removed unused function.
This commit is contained in:
parent
240273a4c9
commit
01e7617077
1 changed files with 0 additions and 14 deletions
|
@ -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;
|
||||
|
|
Loading…
Add table
Reference in a new issue