Go to the source code of this file.
Functions | |
| our ($num_recordings, $heading, $plain_text, $text_format, $usage) | |
| our ($hours, $minutes, $seconds, $no_conflicts_message) | |
| our ($dnum_recordings, $dheading, $dtext_format) | |
| our ($status_text_format, $status_value_format) | |
| GetOptions ('num_recordings|recordings=s'=>\$num_recordings, 'hours|o=i'=>\$hours, 'minutes=i'=>\$minutes, 'seconds|s=i'=>\$seconds, 'show_scheduled|_show_scheduled|scheduled|_scheduled|e!'=>\$scheduled, 'show_duplicates|_show_duplicates|duplicates|_duplicates|p!'=>\$duplicates, 'show_deactivated|_show_deactivated|deactivated|_deactivated|v!'=>\$deactivated, 'show_conflicts|_show_conflicts|conflicts|_conflicts!'=>\$conflicts, 'heading=s'=>\$heading, 'plain_text'=>\$plain_text, 'text_format=s'=>\$text_format, 'no_conflicts_message=s'=>\$no_conflicts_message, 'status_text_format=s'=>\$status_text_format, 'status_value_format=s'=>\$status_value_format, 'usage|help'=>\$usage) | |
| if ($usage) | |
| if (defined($plain_text)) | |
| if ((!$has_conflicts)&&(($conflicts)&&(!(($scheduled)||($duplicates)||($deactivated))))) | |
| foreach my | $row (@{$rows{'rows'}}) |
Variables | |
| use | DBI |
| use | MythTV |
| $dnum_recordings = 5 | |
| $dhours = -1 | |
| $dminutes = -1 | |
| $dseconds = -1 | |
| $dscheduled = 1 | |
| $dduplicates = 0 | |
| $ddeactivated = 0 | |
| $dconflicts = 1 | |
| $dheading = 'Upcoming Recordings:\n' | |
| $dtext_format = '%rs\n%n/%j | |
| g | __pad3__ |
| $dno_conflicts_message = 'No conflicts.\n' | |
| $dstatus_text_format = '<a href="#">%rs - %n/%j | |
| g | __pad4__ |
| g | g |
| $dstatus_value_format = '%n/%j | |
| g | __pad5__ |
| $num_recordings = $dnum_recordings | |
| $hours = $dhours | |
| $minutes = $dminutes | |
| $seconds = $dseconds | |
| $scheduled = $dscheduled | |
| $duplicates = $dduplicates | |
| $deactivated = $ddeactivated | |
| $conflicts = $dconflicts | |
| $heading = $dheading | |
| $text_format = $dtext_format | |
| $no_conflicts_message = $dno_conflicts_message | |
| $status_text_format = $dstatus_text_format | |
| $status_value_format = $dstatus_value_format | |
| my | $now = time() |
| my | $start_before = $now |
| my | $count = 0 |
| my | rows = $Myth->backend_rows('QUERY_GETALLPENDING', 2) |
| my | $has_conflicts = $rows{'offset'}[0] |
| my | $num_scheduled = $rows{'offset'}[1] |
| our | $show |
| our | ( | $ | num_recordings, | |
| $ | heading, | |||
| $ | plain_text, | |||
| $ | text_format, | |||
| $ | usage | |||
| ) |
| our | ( | $ | hours, | |
| $ | minutes, | |||
| $ | seconds, | |||
| $ | no_conflicts_message | |||
| ) |
| our | ( | $ | dnum_recordings, | |
| $ | dheading, | |||
| $ | dtext_format | |||
| ) |
| our | ( | $ | status_text_format, | |
| $ | status_value_format | |||
| ) |
| GetOptions | ( | 'num_recordings| | recordings = s'=, |
|
| \$ | num_recordings, | |||
| 'hours| | o = i'=, |
|||
| \$ | hours, | |||
| ' | minutes = i'=, |
|||
| \$ | minutes, | |||
| 'seconds| | s = i'=, |
|||
| \$ | seconds, | |||
| 'show_scheduled|_show_scheduled|scheduled|_scheduled|e!' | , | |||
| \$ | scheduled, | |||
| 'show_duplicates|_show_duplicates|duplicates|_duplicates|p!' | , | |||
| \$ | duplicates, | |||
| 'show_deactivated|_show_deactivated|deactivated|_deactivated|v!' | , | |||
| \$ | deactivated, | |||
| 'show_conflicts|_show_conflicts|conflicts|_conflicts!' | , | |||
| \$ | conflicts, | |||
| ' | heading = s'=, |
|||
| \$ | heading, | |||
| 'plain_text' | , | |||
| \$ | plain_text, | |||
| ' | text_format = s'=, |
|||
| \$ | text_format, | |||
| ' | no_conflicts_message = s'=, |
|||
| \$ | no_conflicts_message, | |||
| ' | status_text_format = s'=, |
|||
| \$ | status_text_format, | |||
| ' | status_value_format = s'=, |
|||
| \$ | status_value_format, | |||
| 'usage|help' | , | |||
| \$ | usage | |||
| ) |
| if | ( | $ | usage | ) |
Definition at line 86 of file myth_upcoming_recordings.pl.
| if | ( | defined($plain_text) | ) |
Definition at line 220 of file myth_upcoming_recordings.pl.
| if | ( | (!$has_conflicts)&&(($conflicts)&&(!(($scheduled)||($duplicates)||($deactivated)))) | ) |
Definition at line 236 of file myth_upcoming_recordings.pl.
| foreach my $row | ( | ) |
Definition at line 246 of file myth_upcoming_recordings.pl.
| use DBI |
Definition at line 9 of file myth_upcoming_recordings.pl.
| use MythTV |
Definition at line 11 of file myth_upcoming_recordings.pl.
| $dnum_recordings = 5 |
Definition at line 24 of file myth_upcoming_recordings.pl.
| $dhours = -1 |
Definition at line 26 of file myth_upcoming_recordings.pl.
| $dminutes = -1 |
Definition at line 27 of file myth_upcoming_recordings.pl.
| $dseconds = -1 |
Definition at line 28 of file myth_upcoming_recordings.pl.
| $dscheduled = 1 |
| $dduplicates = 0 |
| $ddeactivated = 0 |
| $dconflicts = 1 |
| $dheading = 'Upcoming Recordings:\n' |
Definition at line 35 of file myth_upcoming_recordings.pl.
Definition at line 37 of file myth_upcoming_recordings.pl.
Definition at line 37 of file myth_upcoming_recordings.pl.
| $dno_conflicts_message = 'No conflicts.\n' |
Definition at line 39 of file myth_upcoming_recordings.pl.
Definition at line 41 of file myth_upcoming_recordings.pl.
Definition at line 41 of file myth_upcoming_recordings.pl.
Definition at line 41 of file myth_upcoming_recordings.pl.
| $dstatus_value_format = '%n/%j |
Definition at line 46 of file myth_upcoming_recordings.pl.
Definition at line 46 of file myth_upcoming_recordings.pl.
| $num_recordings = $dnum_recordings |
Definition at line 49 of file myth_upcoming_recordings.pl.
| $hours = $dhours |
Definition at line 50 of file myth_upcoming_recordings.pl.
| $minutes = $dminutes |
Definition at line 51 of file myth_upcoming_recordings.pl.
| $seconds = $dseconds |
Definition at line 52 of file myth_upcoming_recordings.pl.
| $scheduled = $dscheduled |
Definition at line 53 of file myth_upcoming_recordings.pl.
| $duplicates = $dduplicates |
Definition at line 54 of file myth_upcoming_recordings.pl.
| $deactivated = $ddeactivated |
Definition at line 55 of file myth_upcoming_recordings.pl.
| $conflicts = $dconflicts |
Definition at line 56 of file myth_upcoming_recordings.pl.
| $heading = $dheading |
Definition at line 57 of file myth_upcoming_recordings.pl.
| $text_format = $dtext_format |
Definition at line 58 of file myth_upcoming_recordings.pl.
| $no_conflicts_message = $dno_conflicts_message |
Definition at line 59 of file myth_upcoming_recordings.pl.
| $status_text_format = $dstatus_text_format |
Definition at line 60 of file myth_upcoming_recordings.pl.
| $status_value_format = $dstatus_value_format |
Definition at line 61 of file myth_upcoming_recordings.pl.
| my $now = time() |
Definition at line 212 of file myth_upcoming_recordings.pl.
| $start_before = $now |
Definition at line 213 of file myth_upcoming_recordings.pl.
| my $count = 0 |
Definition at line 233 of file myth_upcoming_recordings.pl.
| my rows = $Myth->backend_rows('QUERY_GETALLPENDING', 2) |
Definition at line 234 of file myth_upcoming_recordings.pl.
Definition at line 235 of file myth_upcoming_recordings.pl.
Definition at line 244 of file myth_upcoming_recordings.pl.
| our $show |
Definition at line 245 of file myth_upcoming_recordings.pl.
1.5.5