projects
/
debian
/
gzip
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Imported Upstream version 1.5
[debian/gzip]
/
sample
/
ztouch
diff --git
a/sample/ztouch
b/sample/ztouch
index e408e2bc50bdd5c24ec823ad29a198125159508b..c5d30ad6794980050bd83b51014933d1807062e2 100755
(executable)
--- a/
sample/ztouch
+++ b/
sample/ztouch
@@
-7,9
+7,9
@@
foreach $file (@ARGV) {
read (FILE, $_, 8);
($magic, $method, $flags, $time) = unpack ("A2C2V", $_);
if ($magic eq "\037\213") {
read (FILE, $_, 8);
($magic, $method, $flags, $time) = unpack ("A2C2V", $_);
if ($magic eq "\037\213") {
- utime ($time, $time, $file);
+
utime ($time, $time, $file);
}
else {
}
else {
- warn "$file is not compressed with gzip!\n";
+
warn "$file is not compressed with gzip!\n";
}
}
}
}