From 19ce506ccbe647c2c8360fd5d06a76a9eaf4cbfa Mon Sep 17 00:00:00 2001 From: Pino Toscano Date: Wed, 24 Apr 2019 12:49:28 +0200 Subject: [PATCH] perl: silence usage of add_cdrom in test One test explicitly tests add_cdrom, so silence the deprecation warning only for that function. --- perl/t/060-handle-properties.t | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/perl/t/060-handle-properties.t b/perl/t/060-handle-properties.t index 6b1ee4242..8df6a68c3 100644 --- a/perl/t/060-handle-properties.t +++ b/perl/t/060-handle-properties.t @@ -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"); +}