[Bps-public-commit] r11684 - in sd/trunk: .

[sartak at bestpractical.com]

Author: sartak
Date: Fri Apr 11 13:58:16 2008
New Revision: 11684

Modified:
   sd/trunk/   (props changed)
   sd/trunk/t/sd-rt-hm.t
   sd/trunk/t/sd-rt.t

Log:
 r53971 at onn:  sartak | 2008-04-11 13:58:09 -0400
 skip_all conveniently drops everything after the first line, rendering the warning that you don't have rights to read the config invisible


Modified: sd/trunk/t/sd-rt-hm.t
==============================================================================
--- sd/trunk/t/sd-rt-hm.t	(original)
+++ sd/trunk/t/sd-rt-hm.t	Fri Apr 11 13:58:16 2008
@@ -9,8 +9,10 @@
 use Prophet::Test;
 
 BEGIN {
-    eval 'require RT::Test; 1'
-        or plan skip_all => 'requires 3.7 to run tests.' . $@;
+    unless (eval 'use RT::Test; 1') {
+        diag $@;
+        plan skip_all => 'requires 3.7 to run tests.';
+    }
 }
 
 BEGIN {

Modified: sd/trunk/t/sd-rt.t
==============================================================================
--- sd/trunk/t/sd-rt.t	(original)
+++ sd/trunk/t/sd-rt.t	Fri Apr 11 13:58:16 2008
@@ -6,8 +6,10 @@
 use strict;
 
 use Test::More;
-eval 'use RT::Test; 1'
-    or plan skip_all => 'requires 3.7 to run tests.' . $@;
+unless (eval 'use RT::Test; 1') {
+    diag $@;
+    plan skip_all => 'requires 3.7 to run tests.';
+}
 
 eval 'use Prophet::Test tests => 9';