[Bast-commits] r5869 - Devel-Declare/1.000/trunk/t

[rafl at dev.catalyst.perl.org]

Author: rafl
Date: 2009-04-09 01:35:58 +0100 (Thu, 09 Apr 2009)
New Revision: 5869

Modified:
   Devel-Declare/1.000/trunk/t/quote.t
Log:
UnTODO passing tests.

Modified: Devel-Declare/1.000/trunk/t/quote.t
===================================================================
--- Devel-Declare/1.000/trunk/t/quote.t	2009-04-09 00:35:42 UTC (rev 5868)
+++ Devel-Declare/1.000/trunk/t/quote.t	2009-04-09 00:35:58 UTC (rev 5869)
@@ -8,17 +8,17 @@
 
 TODO: {
     local $TODO = "dd_ck_const doesn't special-case ops created in quotelike contexts";
-    test_eval 'qr/method/';
     test_eval 'qq/method/';
-    test_eval '/method/';
-    test_eval 's/method//';
     test_eval '`method`';
     test_eval 'qx/method/';
-    test_eval 'tr/method/METHOD/';
 
 }
 
 # these ones work OK
+test_eval 'qr/method/';
+test_eval '/method/';
+test_eval 's/method//';
+test_eval 'tr/method/METHOD/';
 test_eval 'q/method/';
 test_eval "'method'";
 test_eval '"method"';