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
@@ -1,11 +1,13 @@
[chiark-utils.git]
/
backup
/
increm
diff --git
a/backup/increm
b/backup/increm
index b50f50e8c9040d93475a1e8b8edcd455ca2f100a..945bb0e5dec5118b1e561be5a5f6fdb62b9da61a 100755
(executable)
--- a/
backup/increm
+++ b/
backup/increm
@@
-104,15
+104,16
@@
for $tf (@fsys) {
}
if ($tm eq 'dump') {
}
if ($tm eq 'dump') {
- $dumpcmd= "dump 1bfu $softblocksizekb - $atf";
+ $dumplabel= $pcstr.$atf_print.'$';
+ $dumpcmd= "dump 1Lbfu $dumplabel $softblocksizekb - $atf";
} elsif ($tm eq 'gtar') {
$dumpcmd= "tar NCcfl $fsidfile $atf - .";
} else {
} elsif ($tm eq 'gtar') {
$dumpcmd= "tar NCcfl $fsidfile $atf - .";
} else {
- pboth("Not dumping $atf ($prefix) - not supported.\n");
+ pboth("Not dumping $atf
_print
($prefix) - not supported.\n");
next;
}
next;
}
- nexttapefile("inc $prefix:$atf");
+ nexttapefile("inc $prefix:$atf
_print
");
# Same trick as full uses to do a pipeline whilst keeping track
# of all exit statuses:
# Same trick as full uses to do a pipeline whilst keeping track
# of all exit statuses:
@@
-139,8
+140,7
@@
print IAN "$advance\n" or die $!;
close IAN or die $!;
rename 'increm-advance.new','increm-advance' or die $!;
close IAN or die $!;
rename 'increm-advance.new','increm-advance' or die $!;
-print LOG "Next FULL dump tape is $next\n" or die $!;
-print "Next FULL dump tape is $next\n" or die $!;
+pboth("Next FULL dump tape is $next\n");
setstatus "INCREMENTAL successful: $tapedesc, next full is $next";
exit 0;
setstatus "INCREMENTAL successful: $tapedesc, next full is $next";
exit 0;