summaryrefslogtreecommitdiffstats
path: root/perl-install/unused/cdrom.pm
diff options
context:
space:
mode:
authorMystery Man <unknown@mandriva.org>1999-09-29 14:13:47 +0000
committerMystery Man <unknown@mandriva.org>1999-09-29 14:13:47 +0000
commit229435ccf04db72401bb5df7d3b015565952fcc5 (patch)
tree16ffcdb570219012938b771f1b9ab064114d2b5f /perl-install/unused/cdrom.pm
parentec5cc80aff948eceee5b322bc19cf3e4e65a7c3a (diff)
downloaddrakx-backup-do-not-use-229435ccf04db72401bb5df7d3b015565952fcc5.tar
drakx-backup-do-not-use-229435ccf04db72401bb5df7d3b015565952fcc5.tar.gz
drakx-backup-do-not-use-229435ccf04db72401bb5df7d3b015565952fcc5.tar.bz2
drakx-backup-do-not-use-229435ccf04db72401bb5df7d3b015565952fcc5.tar.xz
drakx-backup-do-not-use-229435ccf04db72401bb5df7d3b015565952fcc5.zip
This commit was manufactured by cvs2svn to create tag 'V1_0'.V1_0
Diffstat (limited to 'perl-install/unused/cdrom.pm')
-rw-r--r--perl-install/unused/cdrom.pm41
1 files changed, 0 insertions, 41 deletions
diff --git a/perl-install/unused/cdrom.pm b/perl-install/unused/cdrom.pm
deleted file mode 100644
index b9b6ea699..000000000
--- a/perl-install/unused/cdrom.pm
+++ /dev/null
@@ -1,41 +0,0 @@
-package cdrom;
-
-use diagnostics;
-use strict;
-
-use detect_devices;
-
-
-my %transTable = ( cm206 => 'cm206cd', sonycd535 => 'cdu535');
-
-1;
-
-
-sub setupCDdevicePanel {
- my ($type) = @_;
-}
-
-sub findAtapi {
- my $ide = ideGetDevices();
- foreach (@$ide) { $_->{type} eq 'cdrom' and return $_->{device} }
- error();
-}
-
-sub findSCSIcdrom {
- detect_devices::isSCSI() or return error();
- my $scsi = detect_devices::getSCSI();
- foreach (@$scsi) { $_->{type} eq 'cdrom' and return $_->{device} }
- error();
-}
-
-sub setupCDdevice {
- my ($cddev, $dl) = @_;
- #-TODO
-}
-
-sub removeCDmodule {
- #- this wil fail silently if no CD module has been loaded
- removeDeviceDriver('cdrom');
- 1;
-}
-