From 7b1afd916412048d5d9e68a65eafa1f764f2a3cb Mon Sep 17 00:00:00 2001
From: Oliver Tappe
Date: Sat, 14 Oct 2006 12:34:39 +0000
Subject: * adjusted POD-texts to our current standards.

git-svn-id: http://svn.openslx.org/svn/openslx/trunk@461 95ad53e4-c205-0410-b2fa-d234c58c8868
---
 config-db/slxsetup.pl | 24 +++++++++++++-----------
 1 file changed, 13 insertions(+), 11 deletions(-)

(limited to 'config-db/slxsetup.pl')

diff --git a/config-db/slxsetup.pl b/config-db/slxsetup.pl
index 78ad6b72..4c82be28 100755
--- a/config-db/slxsetup.pl
+++ b/config-db/slxsetup.pl
@@ -8,6 +8,19 @@
 #
 use strict;
 
+my $abstract = q[
+slxsetup.pl
+    This script can be used to show or change the local settings for OpenSLX.
+
+    Any cmdline-argument passed to this script will change the local OpenSLX
+    settings file (usually /etc/opt/openslx/settings.local).
+
+    If you invoke the script without any arguments, it will print the current
+    settings and exit.
+
+    Please use the --man option in order to read the full manual.
+];
+
 use Getopt::Long qw(:config pass_through);
 use Pod::Usage;
 
@@ -21,17 +34,6 @@ use lib "$FindBin::RealBin";
 
 use OpenSLX::Basics;
 
-my $abstract = q[
-slxsetup.pl
-    This script can be used to show or change the local settings for OpenSLX.
-
-    Any cmdline-argument passed to this script will change the local OpenSLX
-    settings file (usually /etc/opt/openslx/settings.local).
-
-    If you invoke the script without any arguments, it will print the current
-    settings and exit.
-];
-
 my (
 	$noShow,
 	$quiet,
-- 
cgit v1.2.3-55-g7522