Changeset 12 for devel/dploy

Timestamp:

05/16/07 20:09:04 (5 years ago)

Author:

bruno

Message:

First working version of the script

File:

• devel/dploy/bin/mrepo-dploy.org (modified) (3 diffs)

devel/dploy/bin/mrepo-dploy.org

@@ -89 +89 @@
 
 foreach $d (split(/ /,$distro)) {
-    my $distrodir="$mrepobasedir/$d";
-    if (! (-d $distrodir)) {
-        printf "Unable to find $distrodir for distribution $d\n" ;
-        next;
-    }
+    #my $distrodir="$mrepobasedir/$d";
+    #if (! (-d $distrodir)) {
+    #printf "Unable to find $distrodir for distribution $d\n" ;
+    #next;
+    #}
     print "Generating conf file for $d\n";
     open(CONF, "> $mrepoconfdir/$d.conf") || die "Unable to create $mrepoconfdir/$d.conf: $!";
@@ -121 +121 @@
             $iso =~ s/\$upd/$u/;
             $iso =~ s/\$version/$v/;
+            # For RHEL we should remove ux or Ux for base distro
             $iso =~ s/-[uU]0// if ($u eq 0);
             printf CONF "iso = $iso\n";
@@ -177 +178 @@
 system "rm -rf $wwwdir/*";
 print "Creating new mrepo environement\n";
-system "/usr/bin/mrepo -c $mrepoconffile -vvvvvv -g";
+system "/usr/bin/mrepo -c $mrepoconffile -g";
 opendir(DIR, $wwwdir) || die "Unable to parse $wwwdir directory: $!";
 my @subdir = grep { ! /^\./ && -f "$_" } readdir(DIR);