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

Auto::GR renamed to $Auto::VERGITREV.

Browse Source
This commit is contained in:
Elijah Perrault committed 2011-02-26 23:11:37 -07:00
1 parent ef75910c0e
commit f7b5428c60
3 files changed
+6 -2
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

bin/auto
+4 -1
View File
@@ -21,6 +21,10 @@ our $Bin = $Bin; ## no critic qw(NamingConventions::Capitalization Variables::Pr
BEGIN { BEGIN {
unshift @INC, "$Bin/../lib"; unshift @INC, "$Bin/../lib";
open my $gitfh, '<', "$Bin/../.git/refs/heads/indev";
our $VERGITREV = substr readline $gitfh, 0, 7;
close $gitfh;
# Set version information. # Set version information.
use constant { ## no critic qw(ValuesAndExpressions::ProhibitConstantPragma) use constant { ## no critic qw(ValuesAndExpressions::ProhibitConstantPragma)
NAME => 'Auto IRC Bot', NAME => 'Auto IRC Bot',
@@ -28,7 +32,6 @@ BEGIN {
SVER => 0, SVER => 0,
REV => 0, REV => 0,
RSTAGE => 'd', RSTAGE => 'd',
GR => substr `cat $Bin/../.git/refs/heads/indev`, 0, 7
}; };
} }
use Lib::Auto; use Lib::Auto;
doc/CHANGELOG
+1
View File
@@ -3,6 +3,7 @@ Auto IRC Bot 3.0: Change Log
3.0 Indev 3.0 Indev
=============================================================================== ===============================================================================
* Auto::GR renamed to $Auto::VERGITREV.
* Bumped minimum version for API to 3.0.0a6. * Bumped minimum version for API to 3.0.0a6.
* Changed on_topic args to: full source hashref, new topic array * Changed on_topic args to: full source hashref, new topic array
* on_topic is now triggered for any topic change, regardless of source. * on_topic is now triggered for any topic change, regardless of source.
lib/Core/IRC.pm
+1 -1
View File
@@ -19,7 +19,7 @@ hook_add("on_uprivmsg", "ctcp_version_reply", sub {
notice($src->{svr}, $src->{nick}, "\001VERSION ".Auto::NAME." ".Auto::VER.".".Auto::SVER.".".Auto::REV.Auto::RSTAGE." ".$OSNAME."\001"); notice($src->{svr}, $src->{nick}, "\001VERSION ".Auto::NAME." ".Auto::VER.".".Auto::SVER.".".Auto::REV.Auto::RSTAGE." ".$OSNAME."\001");
} }
else { else {
notice($src->{svr}, $src->{nick}, "\001VERSION ".Auto::NAME." ".Auto::VER.".".Auto::SVER.".".Auto::REV.Auto::RSTAGE."-".Auto::GR." ".$OSNAME."\001"); notice($src->{svr}, $src->{nick}, "\001VERSION ".Auto::NAME." ".Auto::VER.".".Auto::SVER.".".Auto::REV.Auto::RSTAGE."-$Auto::VERGITREV ".$OSNAME."\001");
} }
} }