From 349efe2a1a5f1e82d2be707f3be99f81caa70f80 Mon Sep 17 00:00:00 2001 From: Jag Talon Date: Thu, 14 Mar 2013 11:18:24 -0400 Subject: [PATCH] Added a heading to the Regexp goodie. --- lib/DDG/Goodie/CanadaPost.pm | 2 -- lib/DDG/Goodie/Regexp.pm | 2 +- 2 files changed, 1 insertion(+), 3 deletions(-) diff --git a/lib/DDG/Goodie/CanadaPost.pm b/lib/DDG/Goodie/CanadaPost.pm index 503290909..a9cfc3de2 100644 --- a/lib/DDG/Goodie/CanadaPost.pm +++ b/lib/DDG/Goodie/CanadaPost.pm @@ -67,8 +67,6 @@ handle query_nowhitespace_nodash => sub { } } - warn "$is_capost"; - # Only exclusive results right now for CA Post. if ($is_capost == 2) { return heading => 'Canada Post Shipment Tracking', html => qq(Track this shipment at Canada Post.); diff --git a/lib/DDG/Goodie/Regexp.pm b/lib/DDG/Goodie/Regexp.pm index c057fdb5a..a7fafd83f 100644 --- a/lib/DDG/Goodie/Regexp.pm +++ b/lib/DDG/Goodie/Regexp.pm @@ -34,7 +34,7 @@ handle query => sub { @results = $str =~ compile_re($regexp, $compiler); }; - return join( ' | ', @results ); + return join( ' | ', @results ), heading => 'Regexp Result'; }; 1; \ No newline at end of file