From 1608b68fe0bfc7d1260453ca26df4c5de06157bc Mon Sep 17 00:00:00 2001
From: Daouda Lo <daouda@mandriva.com>
Date: Thu, 30 Sep 2004 03:54:44 +0000
Subject: - test for backward compatibility (release version)

---
 mdkonline.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/mdkonline.pm b/mdkonline.pm
index a5869e59..fd2369ba 100644
--- a/mdkonline.pm
+++ b/mdkonline.pm
@@ -134,9 +134,10 @@ sub header { "
 * $_[0]
 ********************************************************************************";
 }
+my $releasefile = find { -f $_ } '/etc/mandrakelinux-release', '/etc/mandrake-release', '/etc/redhat-release';
 output($file, map { chomp; "$_\n" }
   header("rpm -qa"), join('', sort `rpm -qa`),
-  header("mandrake version"), cat_('/etc/mandrakelinux-release'));
+  header("mandrake version"), cat_($releasefile));
 system("/usr/bin/bzip2 -f $file");
 open(my $F, $file . ".bz2") or die "Cannot open file : $!";
 my ($chunk, $buffer);
-- 
cgit v1.2.1