diff options
| author | Andreas Brachold <vdr07@deltab.de> | 2009-12-21 21:22:14 +0000 |
|---|---|---|
| committer | Andreas Brachold <vdr07@deltab.de> | 2009-12-21 21:22:14 +0000 |
| commit | 40a83ed6616546f35dc96c72b25edf32f2721ea9 (patch) | |
| tree | eab8f048e7a49a781b3820a13f9f471ce929b155 /lib | |
| parent | d6b4a7ed30075deb159ebc3a5bf7aa6959058fba (diff) | |
| download | xxv-40a83ed6616546f35dc96c72b25edf32f2721ea9.tar.gz xxv-40a83ed6616546f35dc96c72b25edf32f2721ea9.tar.bz2 | |
* RECORDS: small improvement
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/XXV/MODULES/RECORDS.pm | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lib/XXV/MODULES/RECORDS.pm b/lib/XXV/MODULES/RECORDS.pm index 0e94318..c40cad5 100644 --- a/lib/XXV/MODULES/RECORDS.pm +++ b/lib/XXV/MODULES/RECORDS.pm @@ -500,7 +500,9 @@ sub _notify_updatefile { $e->w->cancel; } - lg sprintf "On recorder %d notify events for %s received event: %x", $vid, $e->fullname, $e->mask; + lg sprintf("New recordings, on recorder '%s' notify events for %s received event: %x", + $self->{svdrp}->hostname($vid), + $e->fullname, $e->mask); if((time - $self->{lastupdate}) > 3 # Only if last update prior 3 seconds (avoid callback chill) && $self->_readData()) { @@ -1186,7 +1188,7 @@ sub analyze { $title = join('~',@t); } - $event = $self->createOldEventId($vid, $vdrdata->{id}, $vdrdata->{starttime}, $info->{duration}, $title, $subtitle, $info); + $event = $self->createOldEventId($vid, $vdrdata->{id}, $vdrdata->{starttime}, $title, $subtitle, $info); unless($event) { error sprintf("Couldn't create event!: '%s' !",$vdrdata->{id}); return 0; @@ -1698,7 +1700,6 @@ sub createOldEventId { my $vid = shift; # ID of Video disk recorder my $id = shift || return error('No eventid defined!'); my $start = shift || return error('No start time defined!'); - my $duration = shift || 0; my $title = shift || return error('No title defined!'); my $subtitle = shift; my $info = shift; @@ -1708,7 +1709,7 @@ sub createOldEventId { subtitle => $subtitle, description => $info->{description} || "", channel => $info->{channel} || "<undef>", - duration => $duration, + duration => $info->{duration}, starttime => $start, vpstime => $info->{vpstime} || 0, video => $info->{video} || "", |
