From 14bf42db40a6e7669ea021df1ba5cc264686cb9a Mon Sep 17 00:00:00 2001 From: Oliver Tappe Date: Fri, 18 Aug 2006 18:10:01 +0000 Subject: * fixed several typos git-svn-id: http://svn.openslx.org/svn/openslx/trunk@311 95ad53e4-c205-0410-b2fa-d234c58c8868 --- config-db/ODLX/MetaDB/DBI.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'config-db') diff --git a/config-db/ODLX/MetaDB/DBI.pm b/config-db/ODLX/MetaDB/DBI.pm index acf8b3c4..83372ad9 100644 --- a/config-db/ODLX/MetaDB/DBI.pm +++ b/config-db/ODLX/MetaDB/DBI.pm @@ -555,7 +555,7 @@ sub setSystemIDsOfClient my $clientID = shift; my $systemIDs = shift; - my @currSystems = $self->fetchSystemsOfClient($clientID); + my @currSystems = $self->fetchSystemIDsOfClient($clientID); $self->_updateRefTable('client_system_ref', $clientID, $systemIDs, 'client_id', 'system_id', \@currSystems); } @@ -566,7 +566,7 @@ sub setGroupIDsOfClient my $clientID = shift; my $groupIDs = shift; - my @currGroups = $self->fetchGroupsOfClient($clientID); + my @currGroups = $self->fetchGroupIDsOfClient($clientID); $self->_updateRefTable('group_client_ref', $clientID, $groupIDs, 'client_id', 'group_id', \@currGroups); } @@ -602,7 +602,7 @@ sub setClientIDsOfGroup my $groupID = shift; my $clientIDs = shift; - my @currClients = $self->fetchClientsOfGroup($groupID); + my @currClients = $self->fetchClientIDsOfGroup($groupID); $self->_updateRefTable('group_client_ref', $groupID, $clientIDs, 'group_id', 'client_id', \@currClients); } @@ -613,7 +613,7 @@ sub setSystemIDsOfGroup my $groupID = shift; my $systemIDs = shift; - my @currSystems = $self->fetchSystemsOfGroup($groupID); + my @currSystems = $self->fetchSystemIDsOfGroup($groupID); $self->_updateRefTable('group_system_ref', $groupID, $systemIDs, 'group_id', 'system_id', \@currSystems); } -- cgit v1.2.3-55-g7522