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-10 11:31:35 -07:00
1 parent bfca8bc52f
commit 81e92eb79e
1 file changed
+3 -3
Download Patch File Download Diff File Expand all files Collapse all files
bin/auto
+3 -3
View File
@@ -4,13 +4,13 @@
# Copyright (C) 2010-2011 Xelhua Development Team (doc/CREDITS) # Copyright (C) 2010-2011 Xelhua Development Team (doc/CREDITS)
# This program is free software; rights to this code are stated in doc/LICENSE. # This program is free software; rights to this code are stated in doc/LICENSE.
package Auto; package Auto;
require 5.010000; use 5.010_000;
use strict; use strict;
use warnings; use warnings;
no feature qw(say state);
use POSIX; use POSIX;
use locale; use locale;
use English qw(-no_match_vars); use English qw(-no_match_vars);
use feature qw(switch);
use Sys::Hostname; use Sys::Hostname;
use IO::Socket; use IO::Socket;
use IO::Select; use IO::Select;
@@ -20,7 +20,7 @@ use Class::Unload;
use FindBin qw($Bin); use FindBin qw($Bin);
our $Bin = $Bin; ## no critic qw(NamingConventions::Capitalization Variables::ProhibitPackageVars) our $Bin = $Bin; ## no critic qw(NamingConventions::Capitalization Variables::ProhibitPackageVars)
BEGIN { BEGIN {
unshift @INC, "$Bin/../src"; unshift @INC, "$Bin/../lib";
# Set version information. # Set version information.
use constant { ## no critic qw(ValuesAndExpressions::ProhibitConstantPragma) use constant { ## no critic qw(ValuesAndExpressions::ProhibitConstantPragma)