diff options
Diffstat (limited to 'config-db/t/10-vendor-os.t')
-rw-r--r-- | config-db/t/10-vendor-os.t | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/config-db/t/10-vendor-os.t b/config-db/t/10-vendor-os.t index b0754be7..04aa4f2e 100644 --- a/config-db/t/10-vendor-os.t +++ b/config-db/t/10-vendor-os.t @@ -1,5 +1,8 @@ use Test::More qw(no_plan); +use strict; +use warnings; + use lib '/opt/openslx/lib'; # basic init @@ -176,6 +179,9 @@ ok( is($vendorOS1->{id}, 1, 'really got vendor-OS number 1'); is($vendorOS1->{name}, q{VOS-'1'}, q{really got vendor-OS named "VOS-'1'"}); +# changing nothing at all should succeed +ok($configDB->changeVendorOS(1), 'changing nothing at all in vendor-OS 1'); + # changing a non-existing column should fail ok( ! eval { $configDB->changeVendorOS(1, { xname => "xx" }) }, |