Backtrace.nice can now produce single lines

rakudo · Apr 10, 2012 · 32c674e · 32c674e
1 parent b8fdbea
commit 32c674e
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/core/Backtrace.pm b/src/core/Backtrace.pm
@@ -95,7 +95,7 @@ my class Backtrace is List {
         return @outers;
     }
 
-    method nice() {
+    method nice(:$oneline) {
         try {
             my @frames;
             my Int $i = self.next-interesting-index(-1);
@@ -111,6 +111,7 @@ my class Backtrace is List {
                     @frames.push: $current.clone(line => $prev.line);
                     $i = $target_idx;
                 }
+                last if $oneline;
                 $i = self.next-interesting-index($i);
             }
             return @frames.join;