X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/8abd9ce32e946691e0953f9a8e2c183183d7854e..6b5e657a5cef0fe78cc00d27940e4b6a65bd30b0:/SL/Controller/CustomVariableConfig.pm diff --git a/SL/Controller/CustomVariableConfig.pm b/SL/Controller/CustomVariableConfig.pm index b366ffbf2..33c3dec40 100644 --- a/SL/Controller/CustomVariableConfig.pm +++ b/SL/Controller/CustomVariableConfig.pm @@ -59,10 +59,13 @@ sub action_new { sub show_form { my ($self, %params) = @_; - $self->flags([ - map { split m/=/, 2 } + $self->flags({ + map { split m/=/, $_, 2 } split m/;/, ($self->config->flags || '') - ]); + }); + + $::lxdebug->dump(0, "cflags", $self->config->flags); + $::lxdebug->dump(0, "flags", $self->flags); $self->render('custom_variable_config/form', %params); }