aboutsummaryrefslogtreecommitdiff
path: root/t
diff options
context:
space:
mode:
authorSergey Poznyakoff <gray@gnu.org.ua>2017-03-03 14:12:42 +0200
committerSergey Poznyakoff <gray@gnu.org.ua>2017-03-03 14:12:42 +0200
commit14c6474d73fae6aeaa77dd19e10cf5615448aefb (patch)
treef887ea9cac45d395a6337bb7954482f41a8a667e /t
parent8fbdd4a7c56de2752c866ce3283d3bdbca3ed8bb (diff)
downloadbeam-14c6474d73fae6aeaa77dd19e10cf5615448aefb.tar.gz
beam-14c6474d73fae6aeaa77dd19e10cf5615448aefb.tar.bz2
Locus: correctly handle uninitialized locations
Diffstat (limited to 't')
-rw-r--r--t/locus.t6
1 files changed, 5 insertions, 1 deletions
diff --git a/t/locus.t b/t/locus.t
index a08280b..19fc8cc 100644
--- a/t/locus.t
+++ b/t/locus.t
@@ -3,9 +3,12 @@ use strict;
use Test;
use App::Beam::Config::Locus;
-plan(tests => 7);
+plan(tests => 10);
my $loc = new App::Beam::Config::Locus;
+ok($loc->format, '');
+ok($loc->format('test', 'message'), 'test message');
+
$loc->add('foo', 10);
ok($loc->format, "foo:10");
@@ -17,6 +20,7 @@ ok($loc->format, "foo:10-13");
$loc->add('foo', 24);
$loc->add('foo', 28);
ok($loc->format, "foo:10-13,24,28");
+ok($loc->format('test', 'message'), "foo:10-13,24,28: test message");
$loc->add('bar', 1);
$loc->add('baz', 8);

Return to:

Send suggestions and report system problems to the System administrator.