1 files changed, 3 insertions, 2 deletions

diff --git a/lib/App/Mangemanche.pm b/lib/App/Mangemanche.pm
index d0992f2..228f8fc 100644
--- a/lib/App/Mangemanche.pm
+++ b/lib/App/Mangemanche.pm
@@ -129,11 +129,12 @@ sub list_commands {
     foreach my $mod (sort
                      map {
                          my $name = basename($_);
-                         if (exists($INC{File::Spec->catfile(@classpath,$name)})) {
+                         my $filename = File::Spec->catfile(@classpath,$name);
+                         if (exists($INC{$filename})) {
                              ()
                          } else {
                              eval {
-                                     require $_;
+                                 require $filename;
                              };
                              $name =~ s/\.pm$//;
                              $@ ? () : [$name, $_];