# New Ticket Created by "Ifejinelo Onyiah"
# Please include the string: [perl #54610]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=54610 >
The purpose of this patch is to allow parrot pass the "no trailing
whitespace" test at t/codingstd/trailing_space.t line 50. Just deleted the
empty lines following "done_to:" and "do_sort:" in
"languages/perl6/src/classes/List.pir".
N: Nelo Onyiah
E: [EMAIL PROTECTED]
D: Get parrot to pass the 'no trailing whitespace' test at
t/codingstd/trailing_space.t line 50
Index: languages/perl6/src/classes/List.pir
===================================================================
--- languages/perl6/src/classes/List.pir (revision 27726)
+++ languages/perl6/src/classes/List.pir (working copy)
@@ -660,13 +660,11 @@
goto copy_to
done_to:
-
# Check comparer
if have_comparer goto do_sort
get_hll_global comparer, 'infix:cmp'
do_sort:
-
# Sort in-place
arr.'sort'(comparer)
