From 20603dbfc29d57454174691b43fc497d964d785e Mon Sep 17 00:00:00 2001 From: Oliver Tappe Date: Sat, 24 May 2008 11:49:14 +0000 Subject: * fixed bug introduced recently that would cause attributes of default system to never be removed (which in turn messes up the automatic synchronization of attributes into the default system) git-svn-id: http://svn.openslx.org/svn/openslx/openslx/trunk@1787 95ad53e4-c205-0410-b2fa-d234c58c8868 --- config-db/OpenSLX/MetaDB/DBI.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'config-db') diff --git a/config-db/OpenSLX/MetaDB/DBI.pm b/config-db/OpenSLX/MetaDB/DBI.pm index 23b061d7..271463b5 100644 --- a/config-db/OpenSLX/MetaDB/DBI.pm +++ b/config-db/OpenSLX/MetaDB/DBI.pm @@ -889,7 +889,9 @@ sub setSystemAttrs $valueIsOK->($newAttrs->{$_}) && !exists $oldAttrs{$_} } keys %$newAttrs; my @attrsToBeDeleted - = grep { !$valueIsOK->($newAttrs->{$_}) } keys %oldAttrs; + = grep { + !exists $newAttrs->{$_} || !$valueIsOK->($newAttrs->{$_}) + } keys %oldAttrs; my @attrsToBeUpdated = grep { $valueIsOK->($newAttrs->{$_}) && exists $oldAttrs{$_} -- cgit v1.2.3-55-g7522