ispman/bin ispman.addAdmin, 1.4, 1.5 ispman.addClient, 1.3, 1.4 ispman.addDomainService, 1.4, 1.5 ispman.addHost2HostGroup, 1.4, 1.5 ispman.addReseller, 1.3, 1.4 ispman.addSlaveDomain, 1.5, 1.6 ispman.deleteAdmin, 1.3, 1.4 ispman.deleteClient, 1.3, 1.4 ispman.deleteDomain, 1.5, 1.6 ispman.deleteHost, 1.5, 1.6 ispman.deleteSession, 1.5, 1.6 ispman.deleteUser, 1.4, 1.5 ispman.deletevhost, 1.5, 1.6 ispman.dnsset, 1.16, 1.17 ispman.domainmail, 1.5, 1.6 ispman.fixUsers, 1.3, 1.4 ispman.getClientsCount, 1.3, 1.4 ispman.getTemplate, 1.4, 1.5 ispman.getUserCount, 1.4, 1.5 ispman.getUsersCount, 1.3, 1.4 ispman.listAdmins, 1.2, 1.3 ispman.listClients, 1.3, 1.4 ispman.listHostGroupMembers, 1.3, 1.4 ispman.listHostGroups, 1.3, 1.4 ispman.listHosts, 1.4, 1.5 ispman.listRadiusProfiles, 1.3, 1.4 ispman.listResellers, 1.3, 1.4 ispman.listSessionProcesses, 1.4, 1.5 ispman.listvhos
Joerg Delker <[email protected]> Mon, 02 Oct 2006 19:39:21 +0000
| Newsgroups | gmane.comp.isp.ispman.cvs |
|---|---|
| Message-ID | <[email protected]> |
Update of /cvsroot/ispman/ispman/bin
In directory sc8-pr-cvs2.sourceforge.net:/tmp/cvs-serv32462/bin
Modified Files:
ispman.addAdmin ispman.addClient ispman.addDomainService
ispman.addHost2HostGroup ispman.addReseller
ispman.addSlaveDomain ispman.deleteAdmin ispman.deleteClient
ispman.deleteDomain ispman.deleteHost ispman.deleteSession
ispman.deleteUser ispman.deletevhost ispman.dnsset
ispman.domainmail ispman.fixUsers ispman.getClientsCount
ispman.getTemplate ispman.getUserCount ispman.getUsersCount
ispman.listAdmins ispman.listClients
ispman.listHostGroupMembers ispman.listHostGroups
ispman.listHosts ispman.listRadiusProfiles
ispman.listResellers ispman.listSessionProcesses
ispman.listvhosts ispman.makeHash ispman.makelogs
ispman.processdump ispman.processes ispman.setVar
ispman.setmailtransport ispman.showdomains
ispman.showmailtransport ldifdiff ldifsort
Log Message:
removed historic and obsolete lib include
Index: ispman.getClientsCount
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.getClientsCount,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- ispman.getClientsCount 30 May 2004 23:35:32 -0000 1.3
+++ ispman.getClientsCount 2 Oct 2006 19:39:16 -0000 1.4
@@ -12,7 +12,7 @@
}
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
my $ispman = ISPMan->new();
print $ispman->getClientsCount("ispmanResellerId=$opts{'r'}");
Index: ispman.getUsersCount
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.getUsersCount,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- ispman.getUsersCount 30 May 2004 23:35:32 -0000 1.3
+++ ispman.getUsersCount 2 Oct 2006 19:39:16 -0000 1.4
@@ -5,7 +5,7 @@
( $FindBin::Bin, "$FindBin::Bin/../lib", "$FindBin::Bin/../conf" );
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
use vars qw($ispman);
Index: ispman.deleteAdmin
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.deleteAdmin,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- ispman.deleteAdmin 17 Sep 2006 19:48:50 -0000 1.3
+++ ispman.deleteAdmin 2 Oct 2006 19:39:14 -0000 1.4
@@ -8,7 +8,7 @@
exit;
}
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
use vars qw($ispman);
$ispman = ISPMan->new();
Index: ispman.listRadiusProfiles
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.listRadiusProfiles,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- ispman.listRadiusProfiles 30 May 2004 23:35:32 -0000 1.3
+++ ispman.listRadiusProfiles 2 Oct 2006 19:39:17 -0000 1.4
@@ -5,7 +5,7 @@
( $FindBin::Bin, "$FindBin::Bin/../lib", "$FindBin::Bin/../conf" );
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
my $ispman = ISPMan->new();
Index: ispman.listClients
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.listClients,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- ispman.listClients 30 May 2004 23:35:32 -0000 1.3
+++ ispman.listClients 2 Oct 2006 19:39:17 -0000 1.4
@@ -5,7 +5,7 @@
( $FindBin::Bin, "$FindBin::Bin/../lib", "$FindBin::Bin/../conf" );
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
my $ispman = ISPMan->new();
Index: ispman.listAdmins
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.listAdmins,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- ispman.listAdmins 30 May 2004 23:35:32 -0000 1.2
+++ ispman.listAdmins 2 Oct 2006 19:39:16 -0000 1.3
@@ -5,7 +5,7 @@
( $FindBin::Bin, "$FindBin::Bin/../lib", "$FindBin::Bin/../conf" );
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
my $ispman = ISPMan->new();
Index: ispman.deleteSession
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.deleteSession,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- ispman.deleteSession 30 May 2004 23:35:31 -0000 1.5
+++ ispman.deleteSession 2 Oct 2006 19:39:15 -0000 1.6
@@ -4,7 +4,7 @@
unshift @INC,
( $FindBin::Bin, "$FindBin::Bin/../lib", "$FindBin::Bin/../conf" );
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
my $ispman = ISPMan->new();
exit unless @ARGV;
Index: ispman.processes
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.processes,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- ispman.processes 31 May 2004 20:13:40 -0000 1.5
+++ ispman.processes 2 Oct 2006 19:39:18 -0000 1.6
@@ -11,7 +11,7 @@
}
}
-use lib qw(%%installDir%%/lib);
+
my $hostname = $opts{'h'} || $ENV{'HOSTNAME'};
use ISPMan;
Index: ispman.addClient
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.addClient,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- ispman.addClient 30 May 2004 23:35:31 -0000 1.3
+++ ispman.addClient 2 Oct 2006 19:39:12 -0000 1.4
@@ -13,7 +13,7 @@
}
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
use CGI;
Index: ispman.fixUsers
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.fixUsers,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- ispman.fixUsers 30 May 2004 23:35:32 -0000 1.3
+++ ispman.fixUsers 2 Oct 2006 19:39:15 -0000 1.4
@@ -23,7 +23,7 @@
( $FindBin::Bin, "$FindBin::Bin/../lib", "$FindBin::Bin/../conf" );
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
use vars qw($ispman);
$ispman = ISPMan->new();
Index: ispman.addReseller
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.addReseller,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- ispman.addReseller 30 May 2004 23:35:31 -0000 1.3
+++ ispman.addReseller 2 Oct 2006 19:39:13 -0000 1.4
@@ -13,7 +13,7 @@
}
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
use CGI;
use vars qw($ispman);
Index: ispman.addSlaveDomain
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.addSlaveDomain,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- ispman.addSlaveDomain 17 Sep 2006 19:48:50 -0000 1.5
+++ ispman.addSlaveDomain 2 Oct 2006 19:39:14 -0000 1.6
@@ -27,7 +27,7 @@
'masters' => $masters,
};
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
use CGI;
Index: ispman.getTemplate
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.getTemplate,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- ispman.getTemplate 17 Sep 2006 19:48:50 -0000 1.4
+++ ispman.getTemplate 2 Oct 2006 19:39:16 -0000 1.5
@@ -8,7 +8,7 @@
exit;
}
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
use vars qw($ispman);
$ispman = ISPMan->new();
Index: ispman.getUserCount
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.getUserCount,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- ispman.getUserCount 17 Sep 2006 19:48:50 -0000 1.4
+++ ispman.getUserCount 2 Oct 2006 19:39:16 -0000 1.5
@@ -12,7 +12,7 @@
}
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
use vars qw($ispman);
Index: ispman.makelogs
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.makelogs,v
retrieving revision 1.28
retrieving revision 1.29
diff -u -d -r1.28 -r1.29
--- ispman.makelogs 10 Oct 2005 20:18:23 -0000 1.28
+++ ispman.makelogs 2 Oct 2006 19:39:17 -0000 1.29
@@ -24,7 +24,7 @@
use strict;
use File::Copy;
use File::Path;
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
my $ispman = ISPMan->new();
Index: ispman.setmailtransport
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.setmailtransport,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- ispman.setmailtransport 17 Sep 2006 19:48:50 -0000 1.5
+++ ispman.setmailtransport 2 Oct 2006 19:39:18 -0000 1.6
@@ -11,7 +11,7 @@
exit;
}
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
my $ispman = ISPMan->new();
$ispman->setMailTransport( $opts{'d'}, @ARGV );
Index: ispman.deleteUser
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.deleteUser,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- ispman.deleteUser 2 Oct 2006 19:32:06 -0000 1.4
+++ ispman.deleteUser 2 Oct 2006 19:39:15 -0000 1.5
@@ -10,7 +10,7 @@
}
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
use vars qw($ispman);
$ispman = ISPMan->new();
Index: ispman.processdump
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.processdump,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- ispman.processdump 5 Jun 2004 12:45:18 -0000 1.4
+++ ispman.processdump 2 Oct 2006 19:39:17 -0000 1.5
@@ -10,7 +10,7 @@
( $FindBin::Bin, "$FindBin::Bin/../lib", "$FindBin::Bin/../conf" );
}
-use lib qw(%%installDir%%/lib %%installDir%%//conf);
+
$|++;
#use strict;
Index: ispman.listSessionProcesses
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.listSessionProcesses,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- ispman.listSessionProcesses 31 May 2004 20:13:40 -0000 1.4
+++ ispman.listSessionProcesses 2 Oct 2006 19:39:17 -0000 1.5
@@ -6,7 +6,7 @@
}
my $session = $ARGV[0];
-use lib qw(%%installDir%%/lib);
+
my $hostname = $opts{'h'} || $ENV{'HOSTNAME'};
use ISPMan;
Index: ispman.showmailtransport
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.showmailtransport,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- ispman.showmailtransport 30 May 2004 23:35:32 -0000 1.5
+++ ispman.showmailtransport 2 Oct 2006 19:39:18 -0000 1.6
@@ -5,7 +5,7 @@
( $FindBin::Bin, "$FindBin::Bin/../lib", "$FindBin::Bin/../conf" );
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
my $ispman = ISPMan->new();
my $domains;
Index: ispman.deleteDomain
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.deleteDomain,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- ispman.deleteDomain 17 Sep 2006 19:48:50 -0000 1.5
+++ ispman.deleteDomain 2 Oct 2006 19:39:14 -0000 1.6
@@ -12,7 +12,7 @@
}
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
use CGI;
use vars qw($ispman);
Index: ispman.makeHash
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.makeHash,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- ispman.makeHash 17 Sep 2006 19:48:50 -0000 1.3
+++ ispman.makeHash 2 Oct 2006 19:39:17 -0000 1.4
@@ -14,7 +14,7 @@
}
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
my $ispman = ISPMan->new();
print $ispman->encryptPassWithMethod( $ARGV[0], $opts{'m'}, ) . "\n";
Index: ispman.listvhosts
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.listvhosts,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -d -r1.7 -r1.8
--- ispman.listvhosts 17 Sep 2006 19:48:50 -0000 1.7
+++ ispman.listvhosts 2 Oct 2006 19:39:17 -0000 1.8
@@ -12,7 +12,7 @@
}
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
use vars qw($ispman);
$ispman = ISPMan->new();
Index: ispman.deleteClient
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.deleteClient,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- ispman.deleteClient 17 Sep 2006 19:48:50 -0000 1.3
+++ ispman.deleteClient 2 Oct 2006 19:39:14 -0000 1.4
@@ -8,7 +8,7 @@
exit;
}
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
use vars qw($ispman);
$ispman = ISPMan->new();
Index: ispman.addAdmin
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.addAdmin,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- ispman.addAdmin 17 Sep 2006 19:48:50 -0000 1.4
+++ ispman.addAdmin 2 Oct 2006 19:39:12 -0000 1.5
@@ -12,7 +12,7 @@
}
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
use vars qw($ispman);
Index: ispman.listHostGroups
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.listHostGroups,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- ispman.listHostGroups 30 May 2004 23:35:32 -0000 1.3
+++ ispman.listHostGroups 2 Oct 2006 19:39:17 -0000 1.4
@@ -5,7 +5,7 @@
( $FindBin::Bin, "$FindBin::Bin/../lib", "$FindBin::Bin/../conf" );
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
my $ispman = ISPMan->new();
my $hostGroups = $ispman->getHostGroups();
Index: ispman.addDomainService
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.addDomainService,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- ispman.addDomainService 30 May 2004 23:35:31 -0000 1.4
+++ ispman.addDomainService 2 Oct 2006 19:39:13 -0000 1.5
@@ -25,7 +25,7 @@
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
my $ispman = ISPMan->new();
if (
Index: ispman.showdomains
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.showdomains,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -d -r1.8 -r1.9
--- ispman.showdomains 30 May 2004 23:35:32 -0000 1.8
+++ ispman.showdomains 2 Oct 2006 19:39:18 -0000 1.9
@@ -5,7 +5,7 @@
( $FindBin::Bin, "$FindBin::Bin/../lib", "$FindBin::Bin/../conf" );
}
use Getopt::Std;
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
getopt( 't', \%opts );
Index: ispman.addHost2HostGroup
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.addHost2HostGroup,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- ispman.addHost2HostGroup 17 Sep 2006 19:48:50 -0000 1.4
+++ ispman.addHost2HostGroup 2 Oct 2006 19:39:13 -0000 1.5
@@ -11,7 +11,7 @@
#need to code it properly.
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
use vars qw($ispman);
$ispman = ISPMan->new();
Index: ispman.listHostGroupMembers
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.listHostGroupMembers,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- ispman.listHostGroupMembers 30 May 2004 23:35:32 -0000 1.3
+++ ispman.listHostGroupMembers 2 Oct 2006 19:39:17 -0000 1.4
@@ -5,7 +5,7 @@
( $FindBin::Bin, "$FindBin::Bin/../lib", "$FindBin::Bin/../conf" );
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
my $ispman = ISPMan->new();
my $hostGroupMembers = $ispman->getGroupMembers( $ARGV[0] );
Index: ispman.deletevhost
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.deletevhost,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- ispman.deletevhost 17 Sep 2006 19:48:50 -0000 1.5
+++ ispman.deletevhost 2 Oct 2006 19:39:15 -0000 1.6
@@ -12,7 +12,7 @@
}
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
use vars qw($ispman);
$ispman = ISPMan->new();
Index: ispman.deleteHost
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.deleteHost,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- ispman.deleteHost 17 Sep 2006 19:48:50 -0000 1.5
+++ ispman.deleteHost 2 Oct 2006 19:39:15 -0000 1.6
@@ -8,7 +8,7 @@
exit;
}
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
use vars qw($ispman);
$ispman = ISPMan->new();
Index: ldifdiff
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ldifdiff,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- ldifdiff 15 Jun 2006 16:34:00 -0000 1.4
+++ ldifdiff 2 Oct 2006 19:39:19 -0000 1.5
@@ -52,7 +52,7 @@
=cut
-use lib qw (%%installDir%%/lib);
+
use Net::LDAP;
use Net::LDAP::LDIF;
use Net::LDAP::Util qw(canonical_dn);
Index: ldifsort
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ldifsort,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- ldifsort 30 May 2004 23:35:32 -0000 1.2
+++ ldifsort 2 Oct 2006 19:39:19 -0000 1.3
@@ -43,7 +43,7 @@
=cut
-use lib qw (%%installDir%%/lib);
+
use Net::LDAP::Util qw(canonical_dn);
use MIME::Base64;
Index: ispman.listHosts
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.listHosts,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- ispman.listHosts 30 May 2004 23:35:32 -0000 1.4
+++ ispman.listHosts 2 Oct 2006 19:39:17 -0000 1.5
@@ -5,7 +5,7 @@
( $FindBin::Bin, "$FindBin::Bin/../lib", "$FindBin::Bin/../conf" );
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
my $ispman = ISPMan->new();
my $hosts = $ispman->getHosts();
Index: ispman.dnsset
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.dnsset,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -d -r1.16 -r1.17
--- ispman.dnsset 20 Jun 2006 18:12:00 -0000 1.16
+++ ispman.dnsset 2 Oct 2006 19:39:15 -0000 1.17
@@ -21,7 +21,7 @@
}
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
use vars qw($ispman);
$ispman = ISPMan->new();
Index: ispman.domainmail
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.domainmail,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- ispman.domainmail 8 Feb 2005 21:03:12 -0000 1.5
+++ ispman.domainmail 2 Oct 2006 19:39:15 -0000 1.6
@@ -34,7 +34,7 @@
$|++;
undef $/;
-use lib qw(%%installDir%%/lib);
+
use vars
qw($VERSION @ISA @EXPORT @EXPORT_OK %opts $Config $from $subject $domain);
use Net::SMTP;
Index: ispman.setVar
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.setVar,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -d -r1.8 -r1.9
--- ispman.setVar 17 Sep 2006 19:48:50 -0000 1.8
+++ ispman.setVar 2 Oct 2006 19:39:18 -0000 1.9
@@ -14,7 +14,7 @@
}
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
my $ispman = ISPMan->new();
my $var = shift @ARGV;
Index: ispman.listResellers
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.listResellers,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- ispman.listResellers 30 May 2004 23:35:32 -0000 1.3
+++ ispman.listResellers 2 Oct 2006 19:39:17 -0000 1.4
@@ -5,7 +5,7 @@
( $FindBin::Bin, "$FindBin::Bin/../lib", "$FindBin::Bin/../conf" );
}
-use lib qw(%%installDir%%/lib);
+
use ISPMan;
my $ispman = ISPMan->new();
my $resellers = $ispman->getResellers();
-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys -- and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV