Add test for RT #121434

Raku · Apr 13, 2014 · 7b9c4db · 7b9c4db
1 parent f57331b
commit 7b9c4db
Showing 1 changed file with 10 additions and 1 deletion.
diff --git a/S32-list/uniq.t b/S32-list/uniq.t
@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 32;
+plan 33;
 
 =begin description
 
@@ -142,4 +142,13 @@ This test tests the C<uniq> builtin.
       "final result with [eqv] and objects in place";
 } #4
 
+# RT #121434
+{
+    my %a;
+    %a<foo> = <a b c>;
+    %a<foo>.=uniq;
+    is_deeply %a<foo>, <a b c>.list.item,
+      "\%a<foo> not clobbered by .=uniq";
+} # 1
+
 # vim: ft=perl6