X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/ea869efe76963afb8f54b505fc7cac199e7a2248..53593baa211863fbf66540cf1bcc36c8fb37257f:/SL/Presenter/MaterialComponents.pm

diff --git a/SL/Presenter/MaterialComponents.pm b/SL/Presenter/MaterialComponents.pm
index 7b2a737e3..30123b719 100644
--- a/SL/Presenter/MaterialComponents.pm
+++ b/SL/Presenter/MaterialComponents.pm
@@ -212,7 +212,7 @@ sub input_tag {
 
   _set_id_attribute(\%attributes, $attributes{name});
 
-  my $class = delete %attributes{class};
+  my $class = delete $attributes{class};
   my $icon  = $attributes{icon}
     ? icon(delete $attributes{icon}, class => 'prefix')
     : '';