[perl #44685] [PATCH] t/oo Change .Class to 'Class'

[via RT]

# New Ticket Created by  Colin Kuskie 
# Please include the string:  [perl #44685]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=44685 >


In t/oo/*.t, change .Class to 'Class'                   

Index: t/oo/mro-c3.t
===================================================================
--- t/oo/mro-c3.t       (revision 20629)
+++ t/oo/mro-c3.t       (working copy)
@@ -26,12 +26,12 @@
 .sub 'test' :main
     .local pmc A, B
 
-    A = new .Class
+    A = new 'Class'
     $P0 = find_global 'testA'
     A.'add_method'("foo", $P0)
     A.'add_method'("bar", $P0)
 
-    B = new .Class
+    B = new 'Class'
     B.'add_parent'(A)
     $P0 = find_global 'testB'
     B.'add_method'("foo", $P0)
@@ -56,19 +56,19 @@
 .sub 'test' :main
     .local pmc A, B, C
 
-    A = new .Class
+    A = new 'Class'
     $P0 = find_global 'testA'
     A.'add_method'("foo", $P0)
     A.'add_method'("bar", $P0)
     A.'add_method'("baz", $P0)
 
-    B = new .Class
+    B = new 'Class'
     B.'add_parent'(A)
     $P0 = find_global 'testB'
     B.'add_method'("foo", $P0)
     B.'add_method'("bar", $P0)
 
-    C = new .Class
+    C = new 'Class'
     C.'add_parent'(B)
     $P0 = find_global 'testC'
     C.'add_method'("foo", $P0)
@@ -98,18 +98,18 @@
 .sub 'test' :main
     .local pmc A, B, C
 
-    A = new .Class
+    A = new 'Class'
     $P0 = find_global 'testA'
     A.'add_method'("foo", $P0)
     A.'add_method'("bar", $P0)
     A.'add_method'("baz", $P0)
 
-    B = new .Class
+    B = new 'Class'
     $P0 = find_global 'testB'
     B.'add_method'("foo", $P0)
     B.'add_method'("bar", $P0)
 
-    C = new .Class
+    C = new 'Class'
     C.'add_parent'(B)
     C.'add_parent'(A)
     $P0 = find_global 'testC'
@@ -140,27 +140,27 @@
 .sub 'test' :main
     .local pmc A, B, C, D
 
-    A = new .Class
+    A = new 'Class'
     $P0 = find_global 'testA'
     A.'add_method'("foo", $P0)
     A.'add_method'("bar", $P0)
     A.'add_method'("baz", $P0)
     A.'add_method'("wag", $P0)
 
-    B = new .Class
+    B = new 'Class'
     B.'add_parent'(A)
     $P0 = find_global 'testB'
     B.'add_method'("foo", $P0)
     B.'add_method'("bar", $P0)
     B.'add_method'("baz", $P0)
 
-    C = new .Class
+    C = new 'Class'
     C.'add_parent'(A)
     $P0 = find_global 'testC'
     C.'add_method'("foo", $P0)
     C.'add_method'("bar", $P0)
 
-    D = new .Class
+    D = new 'Class'
     D.'add_parent'(C)
     D.'add_parent'(B)
     $P0 = find_global 'testD'