X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/8315221e21e3560978855576856c02ee56695d35..f99b7288d58185a0e88ea78fa8847a6ae60e6c0f:/SL/Controller/CustomVariableConfig.pm diff --git a/SL/Controller/CustomVariableConfig.pm b/SL/Controller/CustomVariableConfig.pm index 33c3dec40..28ed17929 100644 --- a/SL/Controller/CustomVariableConfig.pm +++ b/SL/Controller/CustomVariableConfig.pm @@ -9,6 +9,7 @@ use List::Util qw(first); use SL::DB::CustomVariableConfig; use SL::Helper::Flash; use SL::Locale::String; +use Data::Dumper; use Rose::Object::MakeMethods::Generic ( scalar => [ qw(config module module_description flags) ], @@ -61,12 +62,9 @@ sub show_form { $self->flags({ map { split m/=/, $_, 2 } - split m/;/, ($self->config->flags || '') + 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); }