X-Git-Url: http://git.rot13.org/?p=BackupPC.git;a=blobdiff_plain;f=lib%2FBackupPC%2FAttrib.pm;h=e19d85c01ec6a0d20609bc292f35d55b5fb21a89;hp=1c0e2a9aa28e8950b75af0e86867e1f87a3c6a56;hb=f076585d3ff9dfe6de32292b897e293008efe74e;hpb=fadae1eaa5482a441bc8e8aa829a063ee6a5f0c0 diff --git a/lib/BackupPC/Attrib.pm b/lib/BackupPC/Attrib.pm index 1c0e2a9..e19d85c 100644 --- a/lib/BackupPC/Attrib.pm +++ b/lib/BackupPC/Attrib.pm @@ -12,7 +12,7 @@ # Craig Barratt # # COPYRIGHT -# Copyright (C) 2001-2003 Craig Barratt +# Copyright (C) 2001-2007 Craig Barratt # # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by @@ -30,7 +30,7 @@ # #======================================================================== # -# Version 3.1.0beta0, released 3 Sep 2007. +# Version 3.2.0, released 31 Dec 2008. # # See http://backuppc.sourceforge.net. # @@ -214,9 +214,9 @@ sub read } (my $magic, $data) = unpack("N a*", $data); if ( $magic != $a->{type} ) { - $a->{_errStr} = sprintf("Wrong magic number in $file" + $a->{_errStr} = sprintf("Wrong magic number in %s" . " (got 0x%x, expected 0x%x)", - $magic, $a->{type}); + $file, $magic, $a->{type}); $fd->close; return; }