Add helper for building subtitle

urkonn · Jul 19, 2016 · acae09e · acae09e
1 parent 1b889f0
commit acae09e
Showing 1 changed file with 16 additions and 3 deletions.
diff --git a/lib/DDG/Goodie/RandomDate.pm b/lib/DDG/Goodie/RandomDate.pm
@@ -66,13 +66,17 @@ handle query => sub {
 
     return if $formatted eq $format;
 
+    my $subtitle = build_subtitle(
+        type   => $type,
+        format => $format,
+    );
+
     return html_enc("$formatted"),
         structured_answer => {
 
             data => {
-              title => html_enc("$formatted"),
-              subtitle => $type eq 'format'
-                ? "Random date for: " . html_enc($format) : "Random $type",
+              title    => html_enc("$formatted"),
+              subtitle => $subtitle,
             },
 
             templates => {
@@ -81,6 +85,15 @@ handle query => sub {
         };
 };
 
+sub build_subtitle {
+    my %options = @_;
+    my $type    = $options{type};
+    my $format  = $options{format};
+    $type eq 'format'
+        ? "Random date for: " . html_enc($format)
+        : "Random $type";
+}
+
 sub format_date {
     my ($format, $date, $force_cldr) = @_;
     my $formatted;