From f1379c6f5ac3f29fd186c9d7a3f0460a32c07f73 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Fri, 30 Jan 2009 10:36:53 +0000
Subject: (get_medium) do not parse hdlists files anymore

---
 perl-install/install/NEWS     | 1 +
 perl-install/install/media.pm | 3 ---
 2 files changed, 1 insertion(+), 3 deletions(-)

diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index 76cf05cd4..6224a6e57 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -5,6 +5,7 @@
 - media management:
   o better layout for DVD/CD copy
   o drop support for parsing the "media_info/hdlists" file
+  o drop support for parsing the "media_info/hdlists" file and for getting hdlists
 
 Version 11.80.1 - 21 January 2008
 
diff --git a/perl-install/install/media.pm b/perl-install/install/media.pm
index 091d93743..325cfb477 100644
--- a/perl-install/install/media.pm
+++ b/perl-install/install/media.pm
@@ -713,9 +713,6 @@ sub get_medium {
 	if (-s $synthesis) {
 	    ($m->{start}, $m->{end}) = $packages->parse_synthesis($synthesis, callback => $callback)
 	      or $error = "bad synthesis $synthesis for $m->{fakemedium}";
-	} elsif (-s $hdlist) {
-	    ($m->{start}, $m->{end}) = $packages->parse_hdlist($hdlist, callback => $callback)
-	      or $error = "bad hdlist $hdlist for $m->{fakemedium}";
 	} else {
 	    $error = "fatal: no hdlist nor synthesis to read for $m->{fakemedium}";
 	}
-- 
cgit v1.2.1