]> git.etc.gen.nz Git - mythtv-status.git/commitdiff
Optionally display the subtitle.
authorAndrew Ruthven <andrew@cerberus.etc.gen.nz>
Fri, 16 Nov 2007 00:07:43 +0000 (13:07 +1300)
committerAndrew Ruthven <andrew@cerberus.etc.gen.nz>
Fri, 16 Nov 2007 00:07:43 +0000 (13:07 +1300)
bin/mythtv-status

index d2cc2ca9254a607ffa00afb233e51aab6ccfd282..2c2f88cf84ba65d022315136476edb1f65c3ed53 100755 (executable)
@@ -18,10 +18,12 @@ use Text::Wrap;
 my $host = "localhost";
 my $port = "6544";
 my $description = undef;
+my $episode = undef;
 
 GetOptions(
   'h|host=s' => \$host,
   'p|port=s' => \$port,
+  'e|episode' => \$episode,
   'd|descripton' => \$description
 );
 
@@ -82,8 +84,10 @@ my @blocks = (
   {
     'name'  => 'Scheduled Recordings',
     'xpath' => '//Status/Scheduled/Program',
-    'attrs' => [ qw/title startTime NODE_TEXT/ ],
-    'template' => "__startTime__ - __title__" . (defined $description ? "\n__NODE_TEXT__" : ''),
+    'attrs' => [ qw/title startTime NODE_TEXT subTitle/ ],
+    'template' => "__startTime__ - __title__" 
+      . (defined $episode ? " - __subTitle__" : '')
+      . (defined $description ? "\n__NODE_TEXT__" : ''),
     'filter' =>  {
        # Only show recordings for today and tomorrow.
        'startTime' => sub {
@@ -118,6 +122,8 @@ for my $block (@blocks) {
       my $value = $key eq 'NODE_TEXT' ? wrap('  ', '  ', $item->string_value()) : $item->getAttribute($key);
       $value =~ s/\s+$//;
 
+      $value ||= 'Unknown';
+
       $skip = 1
         if defined $block->{'filter'}{$key} &&
          &{ $block->{'filter'}{$key} }($value);
@@ -167,6 +173,10 @@ The host to check, defaults to localhost.
 
 The port to use when connecting to MythTV, defaults to 6544.
 
+=item B<-e, --episode>
+
+Display the episode (subtitle) for the scheduled recordings.
+
 =item B<-d, --description>
 
 Display the description for the scheduled recordings.