From 3e6abd178beca15c174316814852798ba135c46c Mon Sep 17 00:00:00 2001
From: Olivier Thauvin <nanardon@mandriva.org>
Date: Mon, 10 Oct 2005 23:26:53 +0000
Subject: - add addmedia() - use MDV::...

---
 editdistrib | 11 ++++++++---
 1 file changed, 8 insertions(+), 3 deletions(-)

(limited to 'editdistrib')

diff --git a/editdistrib b/editdistrib
index db26a1f..f016595 100755
--- a/editdistrib
+++ b/editdistrib
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-use Distribconf::Build;
+use MDV::Distribconf::Build;
 use Term::ReadLine;
 use Text::ParseWords;
 use Getopt::Long;
@@ -24,7 +24,7 @@ my $commands = {
             return;
         }
         foreach (@_) {
-            my $dbuild = Distribconf::Build->new($_);
+            my $dbuild = MDV::Distribconf::Build->new($_);
             $dbuild->load() or do {
                 print STDERR "Can't load distrib from $_\n";
                 next;
@@ -108,7 +108,12 @@ my $commands = {
     },
 
     addmedia => sub {
-    }
+        local @ARGV = @_;
+        my ($m, $name) = @ARGV;
+        foreach (@distribs) {
+            $_->setvalue($m);
+        }
+    },
 };
 
 
-- 
cgit v1.2.1