#
#========================================================================
#
-# Version 2.1.0, released 20 Jun 2004.
+# Version 3.0.0alpha, released 23 Jan 2006.
#
# See http://backuppc.sourceforge.net.
#
}
my $attrib = BackupPC::Attrib->new({ compress => $Conf{CompressLevel} });
-if ( !$attrib->read(".", $ARGV[0]) ) {
+
+my($dir, $file);
+
+if ( $ARGV[0] =~ m{(.+)/(.+)} ) {
+ $dir = $1;
+ $file = $2;
+} else {
+ $dir = $ARGV[0];
+}
+
+if ( !$attrib->read($dir, $file) ) {
print STDERR "Cannot read attrib file $ARGV[0]\n";
exit(1);
}