From 54b9dcf105378eaea8574e5b0bcd734fb355662a Mon Sep 17 00:00:00 2001 From: Tomas Plesnik <plesnik@ics.muni.cz> Date: Thu, 15 Jan 2015 08:28:21 +0100 Subject: [PATCH] zmena volani funkce saveNewEvents; pridan modul warnings; uprava data --- src/warden-client/bin/sender-cli.pl | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/src/warden-client/bin/sender-cli.pl b/src/warden-client/bin/sender-cli.pl index 75fce01..e2efc07 100755 --- a/src/warden-client/bin/sender-cli.pl +++ b/src/warden-client/bin/sender-cli.pl @@ -1,10 +1,12 @@ -#!/usr/bin/perl -w +#!/usr/bin/perl # -# Copyright (C) 2011-2013 Cesnet z.s.p.o +# Copyright (C) 2011-2015 Cesnet z.s.p.o # # Use of this source is governed by a BSD-style license, see LICENSE file. use strict; +use warnings; + use DateTime; use Getopt::Long; @@ -87,9 +89,9 @@ my @event = ($opt_s, $opt_t, $opt_e, $opt_o, $opt_v, my $warden_path = $opt_w; # Inclusion of warden-client sender module -require $warden_path . '/lib/WardenClientSend.pm'; +require $warden_path . '/lib/WardenClient.pm'; # Sending event to Warden server -WardenClientSend::saveNewEvent($warden_path, \@event); +WardenClient::saveNewEvent(\@event); exit 0; -- GitLab