Nicht versuchen, Strings als Hashes zu benutzen

Wenn man aus einen Beleg heraus einen neuen Artikel anlegt, so ist
$form->{CVAR_CONFIGS} mit einem Hash gefüllt. Alle $form-Variablen
werden dann in Hiddens mitgeschliffen, aber halt nicht richtig
gedumpt. Beim nächsten Aufruf von _update_custom_variables steht
deshalb in $form->{CVAR_CONFIGS} ein String 'HASH(0x987387123)', der
natürlich kein Hash ist.

Fix für Bug 1485.

diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index b40e7ed..602273b 100644 (file)
--- a/bin/mozilla/io.pl
+++ b/bin/mozilla/io.pl
@@ -2072,7 +2072,7 @@ sub _update_custom_variables {
 
   my $form     = $main::form;
 
-  $form->{CVAR_CONFIGS}       ||= { };
+  $form->{CVAR_CONFIGS}         = { } unless ref $form->{CVAR_CONFIGS} eq 'HASH';
   $form->{CVAR_CONFIGS}->{IC} ||= CVar->get_configs(module => 'IC');
 
   $main::lxdebug->leave_sub();