diff -r 2d3d0e2e81e7 -r f837948e43a4 bin/imager.restore --- a/bin/imager.restore Mon Aug 15 15:50:38 2011 +0200 +++ b/bin/imager.restore Tue Aug 16 11:04:58 2011 +0200 @@ -13,7 +13,6 @@ use strict; use warnings; use File::Basename; -use Cwd qw(abs_path); use autodie qw(:all); use Pod::Usage; use Getopt::Long; @@ -116,7 +115,7 @@ } sub find_data_dir { - for (my $dir = shift ; $dir ne "/" ; $dir = abs_path("$dir/..")) { + for (my $dir = shift ; $dir ne "/" ; $dir = dirname $dir) { return "$dir/data" if -d "$dir/data" and -d "$dir/idx"; } die ME . ": no data directory found!\n";