Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
Change .join flattening a bit.
  • Loading branch information
pmichaud committed May 4, 2009
1 parent 020fd49 commit 0588e8c
Showing 1 changed file with 2 additions and 1 deletion.
3 changes: 2 additions & 1 deletion src/setting/Any-list.pm
Expand Up @@ -13,7 +13,8 @@ class Any is also {

our Str multi method join($separator = '') {
Q:PIR {
$P0 = 'list'(self)
$P0 = self.'list'()
$P0.'!flatten'()
$P1 = find_lex '$separator'
$S1 = $P1
$S0 = join $S1, $P0
Expand Down

0 comments on commit 0588e8c

Please sign in to comment.