summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorAndreas Brachold <vdr07@deltab.de>2008-07-09 17:40:19 +0000
committerAndreas Brachold <vdr07@deltab.de>2008-07-09 17:40:19 +0000
commit180fcff6fe93d51e6ac68fc43e6fb186dcee80d8 (patch)
treee3333f63b8e22f94b5ac49727758ef3eea9f38e5 /lib
parentb8d12917b48c92412b18c34f6d89cbb350abb3f6 (diff)
downloadxxv-180fcff6fe93d51e6ac68fc43e6fb186dcee80d8.tar.gz
xxv-180fcff6fe93d51e6ac68fc43e6fb186dcee80d8.tar.bz2
* KEYWORDS: Fix reread changed items, if recording edited
* CHANNELS: Fix format of message if new channel found
Diffstat (limited to 'lib')
-rw-r--r--lib/XXV/MODULES/CHANNELS.pm2
-rw-r--r--lib/XXV/MODULES/RECORDS.pm5
2 files changed, 4 insertions, 3 deletions
diff --git a/lib/XXV/MODULES/CHANNELS.pm b/lib/XXV/MODULES/CHANNELS.pm
index 88841b8..3a88a76 100644
--- a/lib/XXV/MODULES/CHANNELS.pm
+++ b/lib/XXV/MODULES/CHANNELS.pm
@@ -1221,7 +1221,7 @@ sub _brandNewChannels {
my $rm = main::getModule('REPORT');
$rm->news(
sprintf(gettext('Found %d new channels!'), scalar keys %$attr),
- join('\r\n',@lines),
+ join("\r\n",@lines),
'clist',
undef,
'veryinteresting',
diff --git a/lib/XXV/MODULES/RECORDS.pm b/lib/XXV/MODULES/RECORDS.pm
index 7a0f292..18a8129 100644
--- a/lib/XXV/MODULES/RECORDS.pm
+++ b/lib/XXV/MODULES/RECORDS.pm
@@ -2242,8 +2242,9 @@ WHERE
my $sth = $obj->{dbh}->prepare('DELETE FROM RECORDS WHERE RecordMD5 = ?');
$sth->execute($recordid)
or return con_err($console,sprintf("Couldn't execute query: %s.",$sth->errstr));
- my @todel = [$recordid];
- $obj->{keywords}->remove('recording',\@todel);
+ my $todel;
+ push(@$todel,$recordid);
+ $obj->{keywords}->remove('recording',$todel);
}
if($dropEPGEntry || $ChangeRecordingData) {
$obj->{lastupdate} = 0;