From e5f1168bf7f8accf218bfec97e4a6e7d0b3726e2 Mon Sep 17 00:00:00 2001
From: Oliver Tappe
Date: Mon, 12 Mar 2007 15:45:50 +0000
Subject: * added separation of support for cloning and installation of
 systems. * minor improvement of POD

git-svn-id: http://svn.openslx.org/svn/openslx/trunk@752 95ad53e4-c205-0410-b2fa-d234c58c8868
---
 installer/slxos-setup | 14 ++++++++++++--
 1 file changed, 12 insertions(+), 2 deletions(-)

(limited to 'installer/slxos-setup')

diff --git a/installer/slxos-setup b/installer/slxos-setup
index b1343ea7..0db7639a 100755
--- a/installer/slxos-setup
+++ b/installer/slxos-setup
@@ -60,8 +60,13 @@ if ($versionReq) {
 openslxInit();
 
 if ($listReq) {
-	print _tr("List of supported distros:\n\t");
-	print join("\n\t", keys %supportedDistros)."\n";
+	print _tr("List of supported distros:\n");
+	print join('', map {
+					"\t$_"
+					 .(' 'x(20-length($_)))
+					 ."\t($supportedDistros{$_}->{support})\n"
+				   }
+				   sort keys %supportedDistros);
 	exit 1;
 }
 
@@ -150,6 +155,7 @@ will be used as a OpenSLX-stage1-system (a.k.a. vendor-OS).
 
   Options:
       --help                   brief help message
+      --list                   show supported distros
       --man                    show full documentation
       --source=<string>        (rsync-)source to clone vendor-OS from
       --version                show version
@@ -168,6 +174,10 @@ will be used as a OpenSLX-stage1-system (a.k.a. vendor-OS).
 
 Prints a brief help message and exits.
 
+=item B<--list>
+
+Lists all supported distros and exits.
+
 =item B<--man>
 
 Prints the manual page and exits.
-- 
cgit v1.2.3-55-g7522