Package: cdrw-taper
Version: 0.3-6
Followup-For: Bug #350111
Here is the patch.
-- System Information:
Debian Release: testing/unstable
APT prefers unstable
APT policy: (500, 'unstable')
Architecture: i386 (i686)
Shell: /bin/sh linked to /bin/dash
Kernel: Linux 2.6.15
Locale: [EMAIL PROTECTED], [EMAIL PROTECTED] (charmap=ISO-8859-15)
Versions of packages cdrw-taper depends on:
ii amanda-server 1:2.4.5p1-2 Advanced Maryland Automatic Networ
ii cdrecord 4:2.01+01a03-5 command line CD writing tool
ii mkisofs 4:2.01+01a03-5 Creates ISO-9660 CD-ROM filesystem
ii perl-base 5.8.7-10 The Pathologically Eclectic Rubbis
cdrw-taper recommends no packages.
-- no debconf information
--- /usr/lib/amanda/taperlib.pm_orig 2006-01-25 16:25:42.000000000 +0100
+++ /usr/lib/amanda/taperlib.pm 2006-01-25 16:29:37.000000000 +0100
@@ -477,7 +477,7 @@
my $command;
if ($type =~ /^CD-RW?$/) {
$command = "$MKISOFS -J -R -pad -quiet $dir | $CDRECORD dev=$dev
-data$blank -";
- } elsif ($type =~ /^DVD\+RW?$/) {
+ } elsif ($type =~ /^DVD[\+\-]RW?$/) {
$command = "$GROWISOFS -use-the-force-luke -Z $mountDev -J -R -pad
-quiet $dir";
} elsif ($type eq 'none') {
return "No media in drive";
--- /usr/sbin/amlabel-cdrw_orig 2006-01-25 16:31:51.000000000 +0100
+++ /usr/sbin/amlabel-cdrw 2006-01-27 13:12:42.000000000 +0100
@@ -72,9 +72,9 @@
if ($type eq 'CD-RW') {
$result = system("$MKISOFS -J -R -pad -quiet /tmp/amlabel-cdrw.$$ |
$CDRECORD dev=$writeDev -data blank=fast -");
error("Error writing CD-RW") if $result / 256 != 0;
-} elsif ($type eq 'DVD[+-]RW') {
- $result = system("$GROWISOFS -Z $mountDev -J -R -pad -quiet
/tmp/amlabel-cdrw.$$");
- error("Error writing DVD+RW") if $result / 256 != 0;
+} elsif ($type =~ /^DVD[\+\-]RW?$/ ) {
+ $result = system("$GROWISOFS -Z $mountDev -J -R -pad
/tmp/amlabel-cdrw.$$");
+ error("Error writing $type ") if $result / 256 != 0;
} elsif ($type eq 'CD-R' or $type eq 'DVD+R') {
error("Don't label a $type");
} elsif ($type eq 'none') {
