--- lib/Stow.pm.in +++ lib/Stow.pm.in @@ -1734,8 +1734,8 @@ sub read_a_link { } elsif (-l $path) { debug(4, " read_a_link($path): real link"); - return readlink $path - or error("Could not read link: $path"); + my $target = readlink $path or error("Could not read link: $path ($!)"); + return $target; } internal_error("read_a_link() passed a non link path: $path\n"); }