sydney/Autobot
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Cleanup.

Browse Source
This commit is contained in:
Elijah Perrault committed 2011-02-08 23:28:26 -07:00
1 parent c45214ced7
commit 3bee5b1158
1 file changed
+2 -2
Download Patch File Download Diff File Expand all files Collapse all files
bin/auto
+2 -2
View File
@@ -119,7 +119,7 @@ if (defined $ARGV[0]) {
} }
# Check for updates. # Check for updates.
&Lib::Auto::checkver(); Lib::Auto::checkver();
# Include IPv6 if Auto was built for it. # Include IPv6 if Auto was built for it.
if ($ENFEAT =~ /ipv6/) { require IO::Socket::INET6; } if ($ENFEAT =~ /ipv6/) { require IO::Socket::INET6; }
@@ -327,7 +327,7 @@ foreach my $cskey (keys %cservers) {
API::Std::event_run('on_preconnect', $cskey); API::Std::event_run('on_preconnect', $cskey);
# Send NICK/USER. # Send NICK/USER.
API::IRC::nick($cskey, $cservers{$cskey}{'nick'}[0]); API::IRC::nick($cskey, $cservers{$cskey}{'nick'}[0]);
socksnd($cskey, 'USER '.$cservers{$cskey}{'ident'}[0].' '.hostname.' '.$cservers{$cskey}{'host'}[0].' :'.$cservers{$cskey}{'realname'}[0]) or socksnd($cskey, 'USER '.$cservers{$cskey}{'ident'}[0].q{ }.hostname.q{ }.$cservers{$cskey}{'host'}[0].' :'.$cservers{$cskey}{'realname'}[0]) or
err(2, 'Failed to connect to server: '.$cskey.' ['.$cservers{$cskey}{'host'}[0].q{:}.$cservers{$cskey}{'port'}[0].']', 0) err(2, 'Failed to connect to server: '.$cskey.' ['.$cservers{$cskey}{'host'}[0].q{:}.$cservers{$cskey}{'port'}[0].']', 0)
and next; and next;
# Add to select. # Add to select.