From 7dd5f0ead1a9270413f305dfb7b73d2b02db74c5 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Wed, 20 Nov 2002 14:22:11 +0000
Subject: update to new security::level scheme

---
 perl-install/printer/printerdrake.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install/printer')

diff --git a/perl-install/printer/printerdrake.pm b/perl-install/printer/printerdrake.pm
index 43fa9d5b5..38ca7bf7c 100644
--- a/perl-install/printer/printerdrake.pm
+++ b/perl-install/printer/printerdrake.pm
@@ -2577,8 +2577,8 @@ sub security_check {
     if ($::isInstall) {
 	$security = $in->{security};
     } else {
-     require any;
-	$security = any::get_secure_level();
+     require security::level;
+	$security = security::level::get();
     }
 
     # Exit silently if the spooler is PDQ
-- 
cgit v1.2.1