[Ispman-cvs] CVS: ispman-utils/lib/ISPMan/DomainMan NoDNSDomain.pm,1.2,1.3 PrimaryDomain.pm,1.2,1.3 ReplicaDomain.pm,1.1,1.2 SlaveDomain.pm,1.2,1.3

[Atif G. <ma...@us...>]

Update of /cvsroot/ispman/ispman-utils/lib/ISPMan/DomainMan
In directory usw-pr-cvs1:/tmp/cvs-serv28404

Modified Files:
	NoDNSDomain.pm PrimaryDomain.pm ReplicaDomain.pm 
	SlaveDomain.pm 
Log Message:
Some style changes

Index: NoDNSDomain.pm
===================================================================
RCS file: /cvsroot/ispman/ispman-utils/lib/ISPMan/DomainMan/NoDNSDomain.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -r1.2 -r1.3
*** NoDNSDomain.pm	2001/04/03 04:01:26	1.2
--- NoDNSDomain.pm	2001/04/29 00:19:26	1.3
***************
*** 16,24 ****
  
  
- 
  sub getDomains {
     my $self=shift;
!    my $domains=$self->{'ldap'}->getEntriesAsHashRef($Config->{'ldapBaseDN'}, '&(objectclass=dnsdomain)(domaintype=nodns)', ["domain", "domaintype"]);
!    return $self->makeDomainHash($domains);
  }
  
--- 16,22 ----
  
  
  sub getDomains {
     my $self=shift;
!    return $self->makeDomainHash($self->{'ldap'}->getEntriesAsHashRef($Config->{'ldapBaseDN'}, '&(objectclass=dnsdomain)(domaintype=nodns)', ["domain", "domaintype"]));
  }
  

Index: PrimaryDomain.pm
===================================================================
RCS file: /cvsroot/ispman/ispman-utils/lib/ISPMan/DomainMan/PrimaryDomain.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -r1.2 -r1.3
*** PrimaryDomain.pm	2001/04/03 04:01:26	1.2
--- PrimaryDomain.pm	2001/04/29 00:19:26	1.3
***************
*** 19,24 ****
  sub getDomains {
     my $self=shift;
!    my $domains=$self->{'ldap'}->getEntriesAsHashRef($Config->{'ldapBaseDN'}, '&(objectclass=dnsdomain)(domaintype=primary)', ["domain", "domaintype"]);
!    return $self->makeDomainHash($domains);
  }
  
--- 19,23 ----
  sub getDomains {
     my $self=shift;
!    return $self->makeDomainHash($self->{'ldap'}->getEntriesAsHashRef($Config->{'ldapBaseDN'}, '&(objectclass=dnsdomain)(domaintype=primary)', ["domain", "domaintype"]));
  }
  

Index: ReplicaDomain.pm
===================================================================
RCS file: /cvsroot/ispman/ispman-utils/lib/ISPMan/DomainMan/ReplicaDomain.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -r1.1 -r1.2
*** ReplicaDomain.pm	2001/02/01 11:26:47	1.1
--- ReplicaDomain.pm	2001/04/29 00:19:26	1.2
***************
*** 16,24 ****
  
  
- 
  sub getDomains {
     my $self=shift;
!    my $domains=$self->{'ldap'}->getEntriesAsHashRef($Config->{'ldapBaseDN'}, '&(objectclass=dnsdomain)(domaintype=replica)', ["domain", "domaintype"]);
!    return $self->makeDomainHash($domains);
  }
  
--- 16,22 ----
  
  
  sub getDomains {
     my $self=shift;
!    return $self->makeDomainHash($self->{'ldap'}->getEntriesAsHashRef($Config->{'ldapBaseDN'}, '&(objectclass=dnsdomain)(domaintype=replica)', ["domain", "domaintype"]));
  }
  

Index: SlaveDomain.pm
===================================================================
RCS file: /cvsroot/ispman/ispman-utils/lib/ISPMan/DomainMan/SlaveDomain.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -r1.2 -r1.3
*** SlaveDomain.pm	2001/04/03 04:01:26	1.2
--- SlaveDomain.pm	2001/04/29 00:19:26	1.3
***************
*** 19,24 ****
  sub getDomains {
     my $self=shift;
!    my $domains=$self->{'ldap'}->getEntriesAsHashRef($Config->{'ldapBaseDN'}, '&(objectclass=dnsdomain)(domaintype=slave)', ["domain", "domaintype"]);
!    return $self->makeDomainHash($domains);
  }
  
--- 19,23 ----
  sub getDomains {
     my $self=shift;
!    return $self->makeDomainHash($self->{'ldap'}->getEntriesAsHashRef($Config->{'ldapBaseDN'}, '&(objectclass=dnsdomain)(domaintype=slave)', ["domain", "domaintype"]));
  }