diff options
| author | Andreas Brachold <vdr07@deltab.de> | 2008-12-07 07:30:57 +0000 |
|---|---|---|
| committer | Andreas Brachold <vdr07@deltab.de> | 2008-12-07 07:30:57 +0000 |
| commit | edb6974f1a503561753dc48754b2b168576683ce (patch) | |
| tree | 3d1e24cb698c0fdd7a0e70d41689a462ecb05b1a /lib | |
| parent | c51b4884d101cf2c3744316245782aee6caf5557 (diff) | |
| download | xxv-edb6974f1a503561753dc48754b2b168576683ce.tar.gz xxv-edb6974f1a503561753dc48754b2b168576683ce.tar.bz2 | |
*AUTOTIMER: Generate title by abstract from epg description with DIR: %title%~%abstract% (#Request:004408)
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/XXV/MODULES/AUTOTIMER.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/XXV/MODULES/AUTOTIMER.pm b/lib/XXV/MODULES/AUTOTIMER.pm index f0da931..b60110d 100644 --- a/lib/XXV/MODULES/AUTOTIMER.pm +++ b/lib/XXV/MODULES/AUTOTIMER.pm @@ -1558,6 +1558,9 @@ sub _placeholder { $at_details{'rating'} = $1 if $data->{description} =~ m/\|Rating: (.*?)\|/; $at_details{'cast'} = $1 if $data->{description} =~ m/\|Cast: (.*?)\|/; + $at_details{'abstract'} = $1 if $data->{description} =~ m/^(.*?)[\.\n]/; + $at_details{'abstract'} = substr($at_details{'abstract'},0,100) if($at_details{'abstract'}); + if ($at->{Dir}) { my $title = $at->{Dir}; if($title =~ /.*%.*%.*/sig) { |