diff --git a/lib/Stow.pm.in b/lib/Stow.pm.in
index 16d6bc0..fe34f1c 100755
--- a/lib/Stow.pm.in
+++ b/lib/Stow.pm.in
@@ -1015,7 +1015,7 @@ sub cleanup_invalid_links {
     debug(2, 0, "Cleaning up any invalid links in $dir (pwd=$cwd)");
 
     if (not -d $dir) {
-        error("cleanup_invalid_links() called with a non-directory: $dir");
+        internal_error("cleanup_invalid_links() called with a non-directory: $dir");
     }
 
     opendir my $DIR, $dir