From a674733cfd92901ed228ca6be5326d3e09224245 Mon Sep 17 00:00:00 2001 From: Stew Benedict Date: Wed, 25 Feb 2004 19:53:26 +0000 Subject: Use ATAPI:/dev/hdX for both 2.4/2.6 compatibility. --- perl-install/standalone/drakbackup | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/perl-install/standalone/drakbackup b/perl-install/standalone/drakbackup index 23188e18d..99a34388d 100755 --- a/perl-install/standalone/drakbackup +++ b/perl-install/standalone/drakbackup @@ -418,9 +418,11 @@ sub get_cd_info() { #- now just report the data if we called --cd-info from the command line foreach my $key (keys %cd_devices) { my $rec_dev = $key; + my $prefix; $rec_dev =~ s/sr/sg/; + $prefix = "ATAPI:" if $rec_dev =~ /hd/; my $can_record = $cd_devices{$key}{cdr} || $cd_devices{$key}{cdrw} || $cd_devices{$key}{dvdr}; - $cd_devices{$key}{rec_dev} = "/dev/" . $rec_dev if $can_record; + $cd_devices{$key}{rec_dev} = $prefix . "/dev/" . $rec_dev if $can_record; if (!$interactive) { print "\n{$key}->{rec_dev} = $cd_devices{$key}{rec_dev}\n"; print "{$key}->{speed} = $cd_devices{$key}{speed}\n"; -- cgit v1.2.1