X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/6b293028a4c1f27bcb07c665a4f43f5362debf1f..cdfebb5085afaf1fe0f0278ca6172d5fe009bd9c:/SL/MoreCommon.pm diff --git a/SL/MoreCommon.pm b/SL/MoreCommon.pm index 196702c22..b0b64d155 100644 --- a/SL/MoreCommon.pm +++ b/SL/MoreCommon.pm @@ -11,7 +11,7 @@ sub save_form { $main::lxdebug->enter_sub(); my $old_form = YAML::Dump($main::form); - $old_form =~ s|!|!!|g; + $old_form =~ s|!|!:|g; $old_form =~ s|\n|!n|g; $old_form =~ s|\r|!r|g; @@ -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};