OpenPKG CVS Repository
http://cvs.openpkg.org/
____________________________________________________________________________
Server: cvs.openpkg.org Name: Ralf S. Engelschall
Root: /v/openpkg/cvs Email: [EMAIL PROTECTED]
Module: openpkg-src Date: 13-Apr-2005 18:27:41
Branch: HEAD Handle: 2005041317274100
Modified files:
openpkg-src/ircii ircii.pl
Log:
fix port handling
Summary:
Revision Changes Path
1.2 +2 -2 openpkg-src/ircii/ircii.pl
____________________________________________________________________________
patch -p0 <<'@@ .'
Index: openpkg-src/ircii/ircii.pl
============================================================================
$ cvs diff -u -r1.1 -r1.2 ircii.pl
--- openpkg-src/ircii/ircii.pl 13 Apr 2005 16:20:19 -0000 1.1
+++ openpkg-src/ircii/ircii.pl 13 Apr 2005 16:27:41 -0000 1.2
@@ -72,7 +72,7 @@
my $lhost = $opt->{-h};
my $lport = 60000 + int(rand() * 1000);
my $rhost = ((defined($ARGV[-1]) and $ARGV[-1] !~ m|^-|) ? $ARGV[-1] :
"irc");
- my $rport = ($opt->{-p} || 6667);
+ my $rport = ($opt->{-p} || 994);
# start an SSL tunnel
my $tmpdir = tempdir("/tmp/ircII-XXXXXX", CLEANUP => 1);
@@ -95,7 +95,7 @@
sleep(1);
# manipulate ircII command line arguments
- unshift(@ARGV, "-p", $lport);
+ splice(@ARGV, -2, 0, "-p", $lport);
$ARGV[-1] = "localhost";
# start ircII through SSL tunnel
@@ .
______________________________________________________________________
The OpenPKG Project www.openpkg.org
CVS Repository Commit List [email protected]
