From ebc3c21baaa7716febe5c6427a73b203879ee009 Mon Sep 17 00:00:00 2001
From: Tomas Plesnik <plesnik@ics.muni.cz>
Date: Tue, 26 Mar 2013 10:52:58 +0100
Subject: [PATCH] zmena textu ve vypisu verze; nazev skriptu tahan z
 exportovane promene  namisto ::RealScript

---
 src/warden-server/bin/getClients.pl       | 6 +++---
 src/warden-server/bin/getStatus.pl        | 6 +++---
 src/warden-server/bin/registerReceiver.pl | 6 +++---
 src/warden-server/bin/registerSender.pl   | 6 +++---
 src/warden-server/bin/unregisterClient.pl | 6 +++---
 5 files changed, 15 insertions(+), 15 deletions(-)

diff --git a/src/warden-server/bin/getClients.pl b/src/warden-server/bin/getClients.pl
index 106ebd3..128faa8 100755
--- a/src/warden-server/bin/getClients.pl
+++ b/src/warden-server/bin/getClients.pl
@@ -11,7 +11,7 @@ use Getopt::Std;
 use DBI;
 use DBD::mysql;
 use FindBin qw($RealBin $RealScript);
-use lib "$FindBin::RealBin/../lib";
+use lib "$RealBin/../lib";
 use WardenCommon;
 
 
@@ -20,7 +20,7 @@ use WardenCommon;
 #				VARIABLES
 ################################################################################
 our $VERSION = "2.2";
-my $etc = "$FindBin::RealBin/../etc";
+my $etc = "$RealBin/../etc";
 
 # read config file
 my $conf_file = "$etc/warden-server.conf";
@@ -46,7 +46,7 @@ sub help {
 
 
 sub version {
-  print "$RealScript: Version: $VERSION\n";
+  print "Current version: $VERSION\n";
   exit 0;
 }
 
diff --git a/src/warden-server/bin/getStatus.pl b/src/warden-server/bin/getStatus.pl
index d041f48..ccfa77e 100755
--- a/src/warden-server/bin/getStatus.pl
+++ b/src/warden-server/bin/getStatus.pl
@@ -12,7 +12,7 @@ use DBI;
 use DBD::mysql;
 use Format::Human::Bytes;
 use FindBin qw($RealBin $RealScript);
-use lib "$FindBin::RealBin/../lib";
+use lib "$RealBin/../lib";
 use WardenCommon;
 
 
@@ -21,7 +21,7 @@ use WardenCommon;
 #				VARIABLES
 ################################################################################
 our $VERSION = "2.2";
-my $etc = "$FindBin::RealBin/../etc";
+my $etc = "$RealBin/../etc";
 
 # read config file
 my $conf_file = "$etc/warden-server.conf";
@@ -47,7 +47,7 @@ sub help {
 
 
 sub version {
-  print "$RealScript: Version: $VERSION\n";
+  print "Current version: $VERSION\n";
   exit 0;
 }
 
diff --git a/src/warden-server/bin/registerReceiver.pl b/src/warden-server/bin/registerReceiver.pl
index b87385c..59f84a5 100755
--- a/src/warden-server/bin/registerReceiver.pl
+++ b/src/warden-server/bin/registerReceiver.pl
@@ -16,7 +16,7 @@ use Sys::Syslog qw(:DEFAULT setlogsock);
 Sys::Syslog::setlogsock('unix');
 use Carp;
 use FindBin qw($RealBin $RealScript);
-use lib "$FindBin::RealBin/../lib";
+use lib "$RealBin/../lib";
 use WardenCommon;
 
 
@@ -25,7 +25,7 @@ use WardenCommon;
 #				VARIABLES
 ################################################################################
 our $VERSION = "2.2";
-my $etc = "$FindBin::RealBin/../etc";
+my $etc = "$RealBin/../etc";
 
 # read config file
 my $conf_file = "$etc/warden-server.conf";
@@ -57,7 +57,7 @@ sub help {
 
 
 sub version {
-  print "$RealScript: Version: $VERSION\n";
+  print "Current version: $VERSION\n";
   exit 0;
 }
 
diff --git a/src/warden-server/bin/registerSender.pl b/src/warden-server/bin/registerSender.pl
index ac74c2d..5146775 100755
--- a/src/warden-server/bin/registerSender.pl
+++ b/src/warden-server/bin/registerSender.pl
@@ -16,7 +16,7 @@ use Sys::Syslog qw(:DEFAULT setlogsock);
 Sys::Syslog::setlogsock('unix');
 use Carp;
 use FindBin qw($RealBin $RealScript);
-use lib "$FindBin::RealBin/../lib";
+use lib "$RealBin/../lib";
 use WardenCommon;
 
 
@@ -25,7 +25,7 @@ use WardenCommon;
 #				VARIABLES
 ################################################################################
 our $VERSION = "2.2";
-my $etc = "$FindBin::RealBin/../etc";
+my $etc = "$RealBin/../etc";
 
 # read config file
 my $conf_file = "$etc/warden-server.conf";
@@ -57,7 +57,7 @@ sub help {
 
 
 sub version {
-  print "$RealScript: Version: $VERSION\n";
+  print "Current version: $VERSION\n";
   exit 0;
 }
 
diff --git a/src/warden-server/bin/unregisterClient.pl b/src/warden-server/bin/unregisterClient.pl
index 1c25470..a17f86a 100755
--- a/src/warden-server/bin/unregisterClient.pl
+++ b/src/warden-server/bin/unregisterClient.pl
@@ -16,7 +16,7 @@ use Sys::Syslog qw(:DEFAULT setlogsock);
 Sys::Syslog::setlogsock('unix');
 use Carp;
 use FindBin qw($RealBin $RealScript);
-use lib "$FindBin::RealBin/../lib";
+use lib "$RealBin/../lib";
 use WardenCommon;
 
 
@@ -25,7 +25,7 @@ use WardenCommon;
 #				VARIABLES
 ################################################################################
 our $VERSION = "2.2";
-my $etc = "$FindBin::RealBin/../etc";
+my $etc = "$RealBin/../etc";
 
 # read config file
 my $conf_file = "$etc/warden-server.conf";
@@ -52,7 +52,7 @@ sub help {
 
 
 sub version {
-  print "$RealScript: Version: $VERSION\n";
+  print "Current version: $VERSION\n";
   exit 0;
 }
 
-- 
GitLab