From 51ec68a7c18b3cfa03e72861912830e4f66ed257 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Wed, 5 Mar 2003 13:41:37 +0000
Subject: prevent warning when using diagnostics pragma (easier debugging)

---
 perl-install/common.pm | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'perl-install/common.pm')

diff --git a/perl-install/common.pm b/perl-install/common.pm
index 79e0271ff..8dbf403b4 100644
--- a/perl-install/common.pm
+++ b/perl-install/common.pm
@@ -15,6 +15,8 @@ use vars qw(@ISA @EXPORT $SECTORSIZE);
 push @EXPORT, @MDK::Common::EXPORT;
 
 
+$::prefix ||= ""; # no warning
+
 #-#####################################################################################
 #- Globals
 #-#####################################################################################
-- 
cgit v1.2.1