From 20c135beb2c6089ee27347d1ac8dd3553f9a3bae Mon Sep 17 00:00:00 2001
From: Tomas Plesnik <plesnik@ics.muni.cz>
Date: Tue, 26 Mar 2013 11:05:53 +0100
Subject: [PATCH] zmena na pouzivani modulu warnings
---
src/warden-server/lib/Warden.pm | 4 +++-
src/warden-server/lib/WardenCommon.pm | 5 +++--
2 files changed, 6 insertions(+), 3 deletions(-)
diff --git a/src/warden-server/lib/Warden.pm b/src/warden-server/lib/Warden.pm
index 08051bc..37593b1 100755
--- a/src/warden-server/lib/Warden.pm
+++ b/src/warden-server/lib/Warden.pm
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
#
# Warden.pm
#
@@ -9,6 +9,8 @@
package Warden;
use strict;
+use warnings;
+
use DBI;
use DBD::mysql;
use Sys::Syslog qw(:DEFAULT setlogsock);
diff --git a/src/warden-server/lib/WardenCommon.pm b/src/warden-server/lib/WardenCommon.pm
index cd56daf..26e90a4 100755
--- a/src/warden-server/lib/WardenCommon.pm
+++ b/src/warden-server/lib/WardenCommon.pm
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
#
# WardenCommon.pm
#
@@ -9,7 +9,8 @@
package WardenCommon;
use strict;
-use File::Basename;
+use warnings;
+
use Sys::Syslog qw(:DEFAULT setlogsock);
Sys::Syslog::setlogsock('unix');
use Carp;
--
GitLab