diff --git a/t/Shop/PayDriver.t b/t/Shop/PayDriver.t index 70ee008be..bd3fcda2a 100644 --- a/t/Shop/PayDriver.t +++ b/t/Shop/PayDriver.t @@ -279,8 +279,11 @@ is ($driver->get('label'), 'Fast and harmless', 'get the label e my $optionsCopy = $driver->get; $optionsCopy->{label} = 'And now for something completely different'; -isnt ($driver->get('label'), 'And now for something completely different', - 'hashref returned by get() is a copy of the internal hashref'); +isnt( + $driver->get('label'), + 'And now for something completely different', + 'hashref returned by get() is a copy of the internal hashref' +); ####################################################################### # diff --git a/t/Shop/ShipDriver.t b/t/Shop/ShipDriver.t index ba5ca166e..c6a3393ec 100644 --- a/t/Shop/ShipDriver.t +++ b/t/Shop/ShipDriver.t @@ -31,7 +31,7 @@ my $session = WebGUI::Test->session; #---------------------------------------------------------------------------- # Tests -my $tests = 36; +my $tests = 37; plan tests => 1 + $tests; #---------------------------------------------------------------------------- @@ -195,6 +195,9 @@ is (WebGUI::Shop::ShipDriver->getName($session), 'Shipper Driver', 'getName retu is($driver->get('enabled'), 1, 'get the enabled entry from the options'); is($driver->get('label'), 'Slow and dangerous', 'get the label entry from the options'); +my $optionsCopy = $driver->get(); +$optionsCopy->{label} = 'fast and furious'; +is($driver->get('label'), 'Slow and dangerous', 'get returns a safe copy of the options'); ####################################################################### #