diff options
author | Guillermo Ramos | 2019-06-25 14:58:48 +0200 |
---|---|---|
committer | Guillermo Ramos | 2019-06-25 14:58:48 +0200 |
commit | dac5fc129224d7a148f97fa5f697c7eeae6489f8 (patch) | |
tree | daac232b862a91b14cdcc9f7e7422c112de4acee | |
parent | 71d0f097da4f35823116c1a89f0c55d2c5adbc74 (diff) | |
download | tgutils-dac5fc129224d7a148f97fa5f697c7eeae6489f8.tar.gz |
Nothing important
-rwxr-xr-x | tgsend | 2 | ||||
-rwxr-xr-x | tgserver | 4 |
2 files changed, 2 insertions, 4 deletions
@@ -36,7 +36,7 @@ my $logger = TgLib::Logger->new($VERBOSE); # Fetch token: CLI || env || file $TOKEN ||= fetch_token() or pod2usage(-message => "ERROR: Unable to get bot token ($!).\n", - -verbose => 99, -sections => "AUTHENTICATION"); + -verbose => 99, -sections => "AUTHENTICATION"); # Read text from stdin undef $/; @@ -11,8 +11,6 @@ use Getopt::Long qw(:config auto_version); use Pod::Usage qw<pod2usage>; use Data::Dumper; -use JSON qw<decode_json>; - use FindBin; use lib "$FindBin::Bin/lib"; @@ -35,7 +33,7 @@ my $logger = TgLib::Logger->new($VERBOSE); # If token was not specified in CLI, get it from ENV/file $TOKEN ||= fetch_token() or pod2usage(-message => "ERROR: Unable to get bot token ($!).\n", - -verbose => 99, -sections => "AUTHENTICATION"); + -verbose => 99, -sections => "AUTHENTICATION"); my $cache = TgLib::Cache->new($logger); my $api = TgLib::Api->new($TOKEN, $logger); |