chiark
/
gitweb
/
~ian
/
chiark-utils.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
xduplic-copier: Drop obsolete variable "ts_last".
[chiark-utils.git]
/
backup
/
labeltape
diff --git
a/backup/labeltape
b/backup/labeltape
index b7081041102b7ea2c0ad47f11f97160c534b788d..fc3d2b388b4bbab50b43484f7808b1a091ac7d31 100755
(executable)
--- a/
backup/labeltape
+++ b/
backup/labeltape
@@
-22,6
+22,8
@@
while ($ARGV[0] =~ m/^-/) {
@ARGV==1 or die "$0: need 1 arg, new TAPEID\n";
($newid)= @ARGV;
@ARGV==1 or die "$0: need 1 arg, new TAPEID\n";
($newid)= @ARGV;
+open LOG, ">/dev/null" or die $!;
+
readtapeid_raw();
if (!open T,'TAPEID') {
readtapeid_raw();
if (!open T,'TAPEID') {