Remove unused variables
This commit is contained in:
@@ -43,7 +43,6 @@ sub __fork;
|
|||||||
sub __signal_handler;
|
sub __signal_handler;
|
||||||
|
|
||||||
local $OUTPUT_AUTOFLUSH = 1;
|
local $OUTPUT_AUTOFLUSH = 1;
|
||||||
my $runAsUid = $UID;
|
|
||||||
|
|
||||||
my $piddir = '/var/run/' . basename (abs_path $PROGRAM_NAME);
|
my $piddir = '/var/run/' . basename (abs_path $PROGRAM_NAME);
|
||||||
my $C = LoadConf ();
|
my $C = LoadConf ();
|
||||||
|
|||||||
@@ -31,7 +31,6 @@ use version; our $VERSION = qw (1.0);
|
|||||||
use Exporter qw (import);
|
use Exporter qw (import);
|
||||||
our @EXPORT_OK = qw (Anek Buni Drink Monkeyuser Kitty Fox Oboobs Obutts Rabbit Owl Frog Horse Snail Xkcd Weather);
|
our @EXPORT_OK = qw (Anek Buni Drink Monkeyuser Kitty Fox Oboobs Obutts Rabbit Owl Frog Horse Snail Xkcd Weather);
|
||||||
|
|
||||||
my @MONTH = qw (yanvar fevral mart aprel may iyun iyul avgust sentyabr oktyabr noyabr dekabr);
|
|
||||||
my $c = LoadConf ();
|
my $c = LoadConf ();
|
||||||
my $cachedir = $c->{cachedir};
|
my $cachedir = $c->{cachedir};
|
||||||
|
|
||||||
@@ -621,7 +620,6 @@ sub __weather {
|
|||||||
my $city = shift;
|
my $city = shift;
|
||||||
$city = urlencode $city;
|
$city = urlencode $city;
|
||||||
my $appid = $c->{openweathermap}->{appid};
|
my $appid = $c->{openweathermap}->{appid};
|
||||||
my $now = time ();
|
|
||||||
my $fc;
|
my $fc;
|
||||||
my $w;
|
my $w;
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user