Neue Gruppenrechte richtig setzen

$::auth->read_groups setzt für jedes im Quellcode bekannte Recht einen
$::auth->Wert in $group->{rights}; für nicht in der DB vorhandene
$::auth->schlicht 0. Daher greift das "if !defined ..." nie.

diff --git a/sql/Pg-upgrade2-auth/productivity_rights.pl b/sql/Pg-upgrade2-auth/productivity_rights.pl
index 4dd0270..4c97c26 100644 (file)
--- a/sql/Pg-upgrade2-auth/productivity_rights.pl
+++ b/sql/Pg-upgrade2-auth/productivity_rights.pl
@@ -16,8 +16,8 @@ sub run {
   my $groups = $main::auth->read_groups();
 
   foreach my $group (values %{$groups}) {
-    $group->{rights}->{productivity}       = 1 unless defined $group->{rights}->{productivity};
-    $group->{rights}->{display_admin_link} = 1 unless defined $group->{rights}->{display_admin_link};
+    $group->{rights}->{productivity}       = 1;
+    $group->{rights}->{display_admin_link} = 1;
     $main::auth->save_group($group);
   }