Revision 805bd930
Von Moritz Bunkus vor fast 18 Jahren hinzugefügt
SL/MoreCommon.pm | ||
---|---|---|
|
||
$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};
|
Auch abrufbar als: Unified diff
Rückwärtskompatibilität mit in der Datenbank gespeicherten Entwürfen, bei denen noch '!!' zum Escapen benutzt wurde.