[perl #61670] list quotes don't return list for 1-elem

[David Whipp]

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


Demonstrated by this test:

<dwhip> rakudo: .say for <A B>.map: { [ .split("") ] }
<p6eval<irc://freenode/p6eval,isnick>> rakudo 34338: OUTPUT«A␤B␤»
<dwhipp> rakudo: .say for <A>.map: { [ .split("") ] }
<p6eval<irc://freenode/p6eval,isnick>> rakudo 34338: OUTPUT«Method 'iterator' 
not found for invocant of class 'Str'␤current instr.: 'parrot;Any;map' pc 9625 
(src/builtins/any-list.pir:228)␤»


-----------------------------------------------------------------------------------
This email message is for the sole use of the intended recipient(s) and may 
contain
confidential information.  Any unauthorized review, use, disclosure or 
distribution
is prohibited.  If you are not the intended recipient, please contact the 
sender by
reply email and destroy all copies of the original message.
-----------------------------------------------------------------------------------