perl: silence usage of add_cdrom in test

One test explicitly tests add_cdrom, so silence the deprecation warning
only for that function.
This commit is contained in:
Pino Toscano
2019-04-24 12:49:28 +02:00
parent b6a7157751
commit 19ce506ccb

View File

@@ -40,5 +40,8 @@ ok ($g->get_path () ne "", "path is empty");
$g->add_drive ("/dev/null");
ok (1, "add drive");
$g->add_cdrom ("/dev/zero");
ok (1, "add cdrom");
do {
no warnings 'deprecated';
$g->add_cdrom ("/dev/zero");
ok (1, "add cdrom");
}