diff --git a/pandora_server/ChangeLog b/pandora_server/ChangeLog index 833261ed4c..52cefe611c 100644 --- a/pandora_server/ChangeLog +++ b/pandora_server/ChangeLog @@ -1,3 +1,7 @@ +2012-02-13 Vanessa Gil + + * util/pandora_manage.pl: Changed Event validate given id. + 2012-02-13 Junichi Satoh * FreeBSD/pandora_server.conf: Changed the plugin_exec to 'gtimeout'. diff --git a/pandora_server/util/pandora_manage.pl b/pandora_server/util/pandora_manage.pl index cc93115def..d64cdc49da 100755 --- a/pandora_server/util/pandora_manage.pl +++ b/pandora_server/util/pandora_manage.pl @@ -2357,6 +2357,9 @@ sub cli_validate_event() { sub cli_validate_event_id() { my $id_event = @ARGV[2]; + + my $event_name = pandora_get_event_name($dbh, $id_event); + exist_check($event_name,'event',$id_event); print "[INFO] Validating event '$id_event'\n\n"; @@ -3052,6 +3055,18 @@ sub cli_module_get_data () { exit; } +############################################################################## +# Return event name given a event id +############################################################################## + +sub pandora_get_event_name($$) { + my ($dbh,$id_event) = @_; + + my $event_name = get_db_value($dbh, 'SELECT evento FROM tevento WHERE id_evento = ?',$id_event); + + return defined ($event_name) ? $event_name : -1; +} + ############################################################################### ############################################################################### # MAIN