GitHub/pbot
3
0
Fork 0
mirror of https://github.com/pragma-/pbot.git synced 2024-11-26 13:59:47 +01:00
Code Issues Projects Releases Wiki Activity

VERSION: minor clean-up

Browse Source
This commit is contained in:
Pragmatic Software 2020-01-19 21:43:04 -08:00
parent 02285c51fd
commit fb9117b6aa
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
PBot/VERSION.pm
View File

@ -23,7 +23,7 @@ BEGIN {
use LWP::UserAgent; use LWP::UserAgent;
# These are set automatically by the build/commit script # These are set automatically by build/update_version.pl
use constant { use constant {
BUILD_NAME => "PBot", BUILD_NAME => "PBot",
BUILD_REVISION => 2841, BUILD_REVISION => 2841,
@ -56,7 +56,7 @@ sub version_cmd {
my $ua = LWP::UserAgent->new(timeout => 10); my $ua = LWP::UserAgent->new(timeout => 10);
my $response = $ua->get($url); my $response = $ua->get($url);
return "Unable to get version information: " . $response->status_line if (not $response->is_success); return "Unable to get version information: " . $response->status_line if not $response->is_success;
my $text = $response->decoded_content; my $text = $response->decoded_content;
my ($version, $date) = $text =~ m/^\s+BUILD_REVISION => (\d+).*^\s+BUILD_DATE\s+=> "([^"]+)"/ms; my ($version, $date) = $text =~ m/^\s+BUILD_REVISION => (\d+).*^\s+BUILD_DATE\s+=> "([^"]+)"/ms;