[Demexp-dev] Hack for ocaml-gettext bug

[David MENTRE]

Hello Sylvain,

For information, I'm using now the following Perl script as a hack
around ocaml-gettext multiple #: lines bug. It might be useful to other
of your ocaml-gettext users.

#!/usr/bin/perl

# A temporary fix for ocaml-gettext: remove multiple contiguous #: lines

$/ = '';
while ( <> ) {
    $_ =~ s/\#:([^\n]+)\n\#:/\#:$1/g; # remove 2 consecutive #: lines
    $_ =~ s/\#:([^\n]+)\n\#:/\#:$1/g; # remove 3 consecutive #: lines
    $_ =~ s/\#:([^\n]+)\n\#:/\#:$1/g; # remove 4 consecutive #: lines
    print $_;
}

Best wishes,
d.
-- 
pub  1024D/A3AD7A2A 2004-10-03 David MENTRE <address@hidden>
 5996 CC46 4612 9CA4 3562  D7AC 6C67 9E96 A3AD 7A2A