Cleanup

vti · Apr 2, 2011 · 7fba2b9 · 7fba2b9
1 parent 8c72ca2
commit 7fba2b9
Show file tree

Hide file tree

Showing 4 changed files with 4 additions and 8 deletions.
diff --git a/lib/Lamework.pm b/lib/Lamework.pm
@@ -125,8 +125,10 @@ sub _detect_home {
     my $self = shift;
 
     my $home = $INC{$self->namespace . '.pm'};
-    $home = Cwd::realpath(
-        File::Spec->catfile(File::Basename::dirname($home), '..'));
+    if (defined $home) {
+        $home = Cwd::realpath(
+            File::Spec->catfile(File::Basename::dirname($home), '..'));
+    }
 
     return $home;
 }

diff --git a/t/middleware/action_builder.t b/t/middleware/action_builder.t
@@ -1,5 +1,3 @@
-#!/usr/bin/env perl
-
 use strict;
 use warnings;
 

diff --git a/t/middleware/routes_dispatcher.t b/t/middleware/routes_dispatcher.t
@@ -1,5 +1,3 @@
-#!/usr/bin/env perl
-
 use strict;
 use warnings;
 

diff --git a/t/middleware/view_displayer.t b/t/middleware/view_displayer.t
@@ -1,5 +1,3 @@
-#!/usr/bin/env perl
-
 use strict;
 use warnings;