diff options
Diffstat (limited to 'scripts/t/700_Dpkg_Control.t')
| -rw-r--r-- | scripts/t/700_Dpkg_Control.t | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/scripts/t/700_Dpkg_Control.t b/scripts/t/700_Dpkg_Control.t index 3d98fab78..712a759f1 100644 --- a/scripts/t/700_Dpkg_Control.t +++ b/scripts/t/700_Dpkg_Control.t @@ -73,22 +73,22 @@ Description: short one is($value, $expected, "Dump of $datadir/control-1"); my $src = $c->get_source(); -is($src, $c->[0], "array representation of Dpkg::Control::Info 1/2"); -is($src->{'my-field-one'}, 'myvalue1', "Access field through badly capitalized field name"); +is($src, $c->[0], 'array representation of Dpkg::Control::Info 1/2'); +is($src->{'my-field-one'}, 'myvalue1', 'Access field through badly capitalized field name'); is($src->{'long-field'}, 'line1 line 2 line 2 line 2 line 3 line 3 line 3 . -line 4', "Get multi-line field"); -is($src->{'Empty-field'}, "", "Get empty field"); +line 4', 'Get multi-line field'); +is($src->{'Empty-field'}, '', 'Get empty field'); my $pkg = $c->get_pkg_by_idx(1); -is($pkg, $c->[1], "array representation of Dpkg::Control::Info 2/2"); +is($pkg, $c->[1], 'array representation of Dpkg::Control::Info 2/2'); is($pkg->{package}, 'mypackage1', 'Name of first package'); -$pkg = $c->get_pkg_by_name("mypackage3"); +$pkg = $c->get_pkg_by_name('mypackage3'); is($pkg->{package}, 'mypackage3', 'Name of third package'); is($pkg->{Depends}, 'hello', 'Name of third package'); |