1 files changed, 0 insertions, 65 deletions
diff --git a/images/make_boot_img b/images/make_boot_img
index 21cb435a0..b096097aa 100755
--- a/images/make_boot_img
+++ b/images/make_boot_img
@@ -166,71 +166,6 @@ sub initrd {
 }
 
 
-sub initrdold {
-    my ($type, $I, $img) = @_;
-    my $stage1_root = $ENV{USE_LOCAL_STAGE1} ? "../mdk-stage1" : "/usr/$lib/drakx-installer-binaries";
-    my ($ext) = $img =~ /rdz-(.*)/ or die "bad initrd name ($img)";
-
-    _ "rm -rf $tmp_initrd";
-    mkdir_p("$tmp_initrd$_") foreach qw(/etc /firmware /lib /modules /sbin /tmp /var);
-    symlink "../modules", "$tmp_initrd/lib/modules";
-    symlink "../firmware", "$tmp_initrd/lib/firmware";
-
-    symlink "/proc/mounts", "$tmp_initrd/etc/mtab";
-    symlink "../tmp", "$tmp_initrd/var/run";
-    _ "install -D /usr/share/terminfo/l/linux $tmp_initrd/usr/share/terminfo/l/linux";
-    foreach ('pcitable', 'usbtable') {
-        _ "install -D /usr/share/ldetect-lst/$_.gz $tmp_initrd/usr/share/ldetect-lst/$_.gz";
-    }
-    _ "install -D /usr/share/pci.ids $tmp_initrd/usr/share/pci.ids";
-    foreach ("dkms-modules.alias", "fallback-modules.alias", "/lib/module-init-tools/ldetect-lst-modules.alias") {
-        my $file = m!^/! ? $_ : "/usr/share/ldetect-lst/$_";
-        _ "install -D $file $tmp_initrd$file";
-    }
-    foreach my $firm (glob_("all.kernels$I/$ext/firmware/*")) {
-        my $dest=$firm;
-        $dest =~ s|all.kernels$I/$ext/||;
-        _ "cp -a $firm $tmp_initrd/$dest";
-    }
-
-    _ "install $stage1_root/init $tmp_initrd/";
-    _ "install $stage1_root/stage1 $tmp_initrd/sbin/";
-    foreach ('pppd', 'pppoe') {
-	_ "install /usr/sbin/${_}-diet $tmp_initrd/sbin/$_";
-    }
-
-    if ($arch !~ /ppc|ia64/) {
-	mkdir_p("$tmp_initrd/etc/pcmcia");
-	 _ "cp -a /etc/pcmcia/config.opts $tmp_initrd/etc/pcmcia";
-    }
-    {
-	my $modz = "all.kernels$I/$ext";
-	mkdir_p("$tmp_initrd/modules/$ext");
-	__ "tar xC $tmp_initrd/modules/$ext -f $modz/${type}_modules.tar";
-        _ "cp -f $modz/modules.$_ $tmp_initrd/modules/$ext" foreach qw(order builtin);
-        substInFile { s,.*/,, } "$tmp_initrd/modules/$ext/modules.order";
-	_ "depmod -b $tmp_initrd $ext";
-	# depmod keeps only available modules in modules.alias, but we want them all
-	_ "cp -f $modz/modules.alias $modz/modules.description $tmp_initrd/modules/$ext";
-    }
-    mkdir_p("$tmp_initrd/$_") foreach qw(dev proc sys var/tmp tmp/stage2);
-    # ka deploy need some files in all.rdz 
-    if ($ENV{DEBUGSTAGE1} || $ENV{BUILD_KA}) {
-	symlink("/sbin", "$tmp_initrd/bin");
-	cp_af("/bin/busybox.static", "$tmp_initrd/sbin/busybox");
-	my @funct = map { /functions:/ .. /^$/ ? do { s/\s//g; split /,/ } : () } `busybox.static`;
-	shift @funct;
-	symlink('busybox', $tmp_initrd . "/sbin/$_") foreach @funct;
-    }
-    if ($ENV{BUILD_KA}) {
-	mkdir_p("$tmp_initrd/ka");
-	cp_af("/usr/bin/ka-d-client", "$tmp_initrd/ka/ka-d-client");
-    }
-
-    _ "(cd $tmp_initrd; find . | cpio -o -c --quiet) | xz --check=crc32 --lzma2=dict=512KiB  > $img";
-    _ "rm -rf $tmp_initrd";
-}
-
 sub entries_append {
     my ($type) = @_;