X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/830512d092a9e89951e2eeb2f7796ca548322fa8..a6f73126160100b236ab93b76bf1af5f080c94f0:/termcol.plp diff --git a/termcol.plp b/termcol.plp index 0068a78..b79f841 100644 --- a/termcol.plp +++ b/termcol.plp @@ -162,7 +162,7 @@ for my $term (@termlist) { sub colorder { my ($palette, $reorder) = @_; - return [ map { $palette->[$_] =~ s/:|$/:$_/r } @{$reorder} ]; + return [ map { $palette->[$_] =~ s/:(?![^:])|$/:$_/r } @{$reorder} ] if $reorder; return $palette; }