X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?a=blobdiff_plain;ds=sidebyside;f=backup%2Flabeltape;h=c06d897a7bdf7415642365ab6c0ab086b34a310f;hb=a194e47af13522a7c536209f4e38a3156357a79c;hp=98961af003839ec3eb90e5f617ed02fa59519d79;hpb=470ba2e9de232758429e7656cfecb18edffabbfa;p=chiark-utils.git

diff --git a/backup/labeltape b/backup/labeltape
index 98961af..c06d897 100755
--- a/backup/labeltape
+++ b/backup/labeltape
@@ -19,7 +19,7 @@ while ($ARGV[0] =~ m/^-/) {
     }
 }
 
-@ARGV==1 or die "$0: need 1 arg, new TAPEID";
+@ARGV==1 or die "$0: need 1 arg, new TAPEID\n";
 ($newid)= @ARGV;
 
 readtapeid_raw();
@@ -38,6 +38,7 @@ print T "$newid\n" or die $!;
 close T or die $!;
 
 writetapeid($newid);
+rewind_raw();
 
 print "Labelled tape \`$newid'\n" or die $!;
 exit 0;