diff options
author | Jonas Smedegaard <dr@jones.dk> | 2008-05-31 09:26:17 +0200 |
---|---|---|
committer | Jonas Smedegaard <dr@jones.dk> | 2013-10-13 00:47:50 +0200 |
commit | 871794cbb16f0297f0b8219feb42d8f5efdf6e63 (patch) | |
tree | 94f29c615e543ab4e6fe5c41b8796d9107439cc9 | |
parent | 39576e67199a706aaac8804d096beee8083b4ddc (diff) |
Fix po4a: Only strip fortune comment in fortunes mode.
-rw-r--r-- | Locale/Po4a/Text.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Locale/Po4a/Text.pm b/Locale/Po4a/Text.pm index 0b0ca70..0edb376 100644 --- a/Locale/Po4a/Text.pm +++ b/Locale/Po4a/Text.pm @@ -192,7 +192,9 @@ sub parse { # paragraph $wrapped_mode = 0; } - $line =~ s/%%(.*)$//; + if ($fortunes) { + $line =~ s/%%(.*)$//; + } # TODO: comments $paragraph .= $line."\n"; } |