[Catalyst-commits] r10766 - Catalyst-Devel/1.00/branches/helper_refactor/lib/Catalyst

[t0m at dev.catalyst.perl.org]

Author: t0m
Date: 2009-06-30 23:53:59 +0000 (Tue, 30 Jun 2009)
New Revision: 10766

Modified:
   Catalyst-Devel/1.00/branches/helper_refactor/lib/Catalyst/Helper.pm
Log:
This is even more horrible, but stops catalyst.pl from being bork in checkouts

Modified: Catalyst-Devel/1.00/branches/helper_refactor/lib/Catalyst/Helper.pm
===================================================================
--- Catalyst-Devel/1.00/branches/helper_refactor/lib/Catalyst/Helper.pm	2009-06-30 23:38:22 UTC (rev 10765)
+++ Catalyst-Devel/1.00/branches/helper_refactor/lib/Catalyst/Helper.pm	2009-06-30 23:53:59 UTC (rev 10766)
@@ -36,8 +36,9 @@
 sub get_sharedir_file {
     my ($self, @filename) = @_;
     my $dist_dir;
-    if (-d "inc/.author") { # Can't use sharedir if we're in a checkout
-                            # this feels horrible, better ideas?
+    if (-d "inc/.author" && -f "lib/Catalyst/Helper.pm"
+            ) { # Can't use sharedir if we're in a checkout
+                # this feels horrible, better ideas?
         $dist_dir = 'share';
     }
     else {