blob: 41c7553d456e62d6d05914eb177059cf38c1877a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
package Bucky;
my $LOCAL_CONFIG =
{
SVN_SECRET => '1s0c4h3dr0n',
};
sub config
{
my ($self, $key) = @_;
$key ||= $self;
return $LOCAL_CONFIG->{$key} if $LOCAL_CONFIG->{$key};
}
1;
|