3
0
mirror of https://github.com/pragma-/pbot.git synced 2024-11-26 13:59:47 +01:00

Finalizing SVN auto-props Id keyword for PBot.pm $VERSION

This commit is contained in:
Pragmatic Software 2010-06-04 23:18:50 +00:00
parent e3680adbb4
commit 4563ca7794

View File

@ -10,8 +10,10 @@ package PBot::PBot;
use strict;
use warnings;
# If you're creating a fork/branch of this code, please rename this file to include the branch name, e.g. PBot-fork.pm
# so that the !version command appropriately reflects this.
use vars qw($VERSION);
$VERSION = sprintf "%s %d %s", q$Id$ =~ /: ([^.]+)\.pm (\d+) ([^ ]+)/g;
$VERSION = sprintf "%s revision %d %s", q$Id$ =~ /: ([^.]+)\.pm (\d+) ([^ ]+)/g;
# unbuffer stdout
STDOUT->autoflush(1);
@ -126,7 +128,7 @@ sub initialize {
export_site => $export_factoids_site,
);
$self->factoids->add_factoid('text', '.*', $botnick, 'version', "/say pbot2 version $VERSION");
$self->factoids->add_factoid('text', '.*', $botnick, 'version', "/say $VERSION");
$self->factoids->load_factoids() if defined $factoids_file;
$self->module_dir($module_dir);