Rückwärtskompatibilität mit in der Datenbank gespeicherten Entwürfen, bei denen noch...

diff --git a/SL/MoreCommon.pm b/SL/MoreCommon.pm
index 9669cdd..b0b64d1 100644 (file)
--- 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};