summaryrefslogtreecommitdiff
blob: 75838e3a7c62dd2a1596595e755ab94278d22c47 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
--- 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");
 }