diff options
Diffstat (limited to 'eg/van/unvanish')
| -rw-r--r-- | eg/van/unvanish | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/eg/van/unvanish b/eg/van/unvanish index 4a83c81232..5c0dab07a2 100644 --- a/eg/van/unvanish +++ b/eg/van/unvanish @@ -1,6 +1,6 @@ #!/usr/bin/perl -# $Header: unvanish,v 2.0 88/06/05 00:17:30 root Exp $ +# $Header: unvanish,v 3.0 89/10/18 15:16:35 lwall Locked $ sub it { if ($olddir ne '.') { @@ -18,7 +18,7 @@ sub it { } print `mv $startfiles$filelist..$force`; if ($olddir ne '.') { - (chdir $pwd) || die "Can't get back to original directory: $pwd"; + (chdir $pwd) || die "Can't get back to original directory $pwd: $!\n"; } } |