[Rt-commit] rt branch, 4.2/inline-server-failed-tests-on-devel-mode, created. rt-4.2.5-145-gf6a4199

[? sunnavy]

The branch, 4.2/inline-server-failed-tests-on-devel-mode has been created
        at  f6a41992ecb4ba8ca381f1bb40e21e69e71d1319 (commit)

- Log -----------------------------------------------------------------
commit f6a41992ecb4ba8ca381f1bb40e21e69e71d1319
Author: sunnavy <sunnavy at bestpractical.com>
Date:   Mon Jul 7 22:57:18 2014 +0800

    don't chdir to make tests happy on inline server + devel mode
    
    before, if you have a relative "lib" only in PERL5LIB and run tests via
    "prove" without "-l", tests could fail badly.

diff --git a/t/web/compilation_errors.t b/t/web/compilation_errors.t
index 399268a..38256d1 100644
--- a/t/web/compilation_errors.t
+++ b/t/web/compilation_errors.t
@@ -37,7 +37,7 @@ is($agent->status, 200, "Fetched the page ok");
 $agent->content_contains('Logout', "Found a logout link");
 
 
-find ( sub { wanted() and test_get($agent, $File::Find::name) } , 'share/html/');
+find ( { wanted => sub { wanted() and test_get($agent, $File::Find::name) }, no_chdir => 1 } , 'share/html/');
 
 # We expect to spew a lot of warnings; toss them away
 $agent->get_warnings;

-----------------------------------------------------------------------