diff options
Diffstat (limited to 'eg/van/empty')
| -rw-r--r-- | eg/van/empty | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/eg/van/empty b/eg/van/empty index 11a55583e1..0f3d9e321f 100644 --- a/eg/van/empty +++ b/eg/van/empty @@ -1,6 +1,6 @@ #!/usr/bin/perl -# $Header: empty,v 2.0 88/06/05 00:17:39 root Exp $ +# $Header: empty,v 3.0 89/10/18 15:16:28 lwall Locked $ # This script empties a trashcan. @@ -12,7 +12,7 @@ chop($pwd = `pwd`); dir: foreach $dir (@ARGV) { unless (chdir $dir) { - print stderr "Can't find directory $dir\n"; + print stderr "Can't find directory $dir: $!\n"; next dir; } if ($recursive) { |