summaryrefslogtreecommitdiffstats
path: root/lib/Crawl/Bot/Plugin/Commit.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Crawl/Bot/Plugin/Commit.pm')
-rw-r--r--lib/Crawl/Bot/Plugin/Commit.pm10
1 files changed, 8 insertions, 2 deletions
diff --git a/lib/Crawl/Bot/Plugin/Commit.pm b/lib/Crawl/Bot/Plugin/Commit.pm
index c3cc847..5fbe3f0 100644
--- a/lib/Crawl/Bot/Plugin/Commit.pm
+++ b/lib/Crawl/Bot/Plugin/Commit.pm
@@ -76,6 +76,12 @@ my %colour_codes = (
url => 13
);
+sub make_web_uri {
+ my $self = shift;
+ my $commit = shift;
+ return "http://s-z.org/neil/git/?p=crawl.git;a=commitdiff;h=$commit";
+}
+
sub colour {
my $self = shift;
my $context = shift;
@@ -128,7 +134,7 @@ sub said {
$commit->{nins}, $commit->{ndel},
$self->colour(query => "reset"),
$self->colour(query => "url"),
- "http://git.develz.org/?p=crawl.git;a=commitdiff;h=$abbr",
+ $self->make_web_uri($abbr),
$self->colour(query => "reset"),
)
);
@@ -208,7 +214,7 @@ sub tick {
$commit->{nins}, $commit->{ndel},
$self->colour(announce => "reset"),
$self->colour(announce => "url"),
- "http://git.develz.org/?p=crawl.git;a=commitdiff;h=$abbr",
+ $self->make_web_uri($abbr),
$self->colour(announce => "reset"),
)
);