X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/e1ffd5ccf2157f5fab765a950ac8cdc07cc5d3b0..805bd93013dc4ec6d0f5504ea25b7cf58359fda2:/SL/MoreCommon.pm diff --git a/SL/MoreCommon.pm b/SL/MoreCommon.pm index 9669cddb3..b0b64d155 100644 --- a/SL/MoreCommon.pm +++ b/SL/MoreCommon.pm @@ -31,7 +31,7 @@ sub restore_form { $old_form =~ s|!r|\r|g; $old_form =~ s|!n|\n|g; - $old_form =~ s|!:|!|g; + $old_form =~ s|![!:]|!|g; my $new_form = YAML::Load($old_form); map { $form->{$_} = $new_form->{$_}; } keys %{$new_form};