X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/8a149188fed60abbd8741050c7394c5f156656dc..dcfdf5de55446462a2e6d54366feef2be8726713:/SL/Auth.pm

diff --git a/SL/Auth.pm b/SL/Auth.pm
index cd16c8e0b..73a37c5eb 100644
--- a/SL/Auth.pm
+++ b/SL/Auth.pm
@@ -970,7 +970,7 @@ sub delete_group {
   my $self = shift;
   my $id   = shift;
 
-  my $form = $main::from;
+  my $form = $main::form;
 
   my $dbh  = $self->dbconnect();
   $dbh->begin_work;