Fix de-htmling

diff --git a/web-lib-funcs.pl b/web-lib-funcs.pl
index 6e4e7af..644903c 100755 (executable)
--- a/web-lib-funcs.pl
+++ b/web-lib-funcs.pl
@@ -1299,7 +1299,7 @@ by the message setup using that function.
 sub error
 {
 my $msg = join("", @_);
-$msg =~ s/<[^>]*>//;
+$msg =~ s/<[^>]*>//g;
 if (!$main::error_must_die) {
        print STDERR "Error: ",$msg,"\n";
        }