From fd9e03e9d802130f94574b21acfa771c4d9fbac1 Mon Sep 17 00:00:00 2001 From: vgilc Date: Mon, 25 Aug 2014 09:54:22 +0000 Subject: [PATCH] 2014-08-25 Vanessa Gil * util/pandora_db.pl: Fixed problem deleting events. Ticket #979. git-svn-id: https://svn.code.sf.net/p/pandora/code/trunk@10455 c3f86ba8-e40f-0410-aaad-9ba5e7f4b01f --- pandora_server/ChangeLog | 5 +++++ pandora_server/util/pandora_db.pl | 1 + 2 files changed, 6 insertions(+) diff --git a/pandora_server/ChangeLog b/pandora_server/ChangeLog index f7e47d5314..699469629d 100644 --- a/pandora_server/ChangeLog +++ b/pandora_server/ChangeLog @@ -1,3 +1,8 @@ +2014-08-25 Vanessa Gil + + * util/pandora_db.pl: Fixed problem + deleting events. Ticket #979. + 2014-08-22 Koichiro Kikuchi * FreeBSD/pandora_server: Fixed bug fail to start pandora_server with diff --git a/pandora_server/util/pandora_db.pl b/pandora_server/util/pandora_db.pl index 5b37d77aef..e53180650c 100755 --- a/pandora_server/util/pandora_db.pl +++ b/pandora_server/util/pandora_db.pl @@ -179,6 +179,7 @@ sub pandora_purgedb ($$) { my @events = get_db_rows ($dbh, 'SELECT * FROM tmetaconsole_event WHERE estado = 0 AND utimestamp < ?', $event_limit); foreach my $event (@events) { db_process_insert($dbh, 'id_evento', 'tmetaconsole_event_history', $event); + db_do($dbh, "DELETE FROM tmetaconsole_event WHERE id_evento =".$event->{'id_evento'}); } }