From d0d21c0a14613f6d775d20540dc3e6d8e8857e4c Mon Sep 17 00:00:00 2001
From: Oliver Tappe
Date: Thu, 21 Aug 2008 19:32:27 +0000
Subject: * slxconfig and slxos-plugin now treat the name 'default' as an alias
 for   '<<<default>>>', which spares us all unnecessary typing ;-)

git-svn-id: http://svn.openslx.org/svn/openslx/openslx/trunk@2073 95ad53e4-c205-0410-b2fa-d234c58c8868
---
 os-plugins/slxos-plugin | 10 ++++++++++
 1 file changed, 10 insertions(+)

(limited to 'os-plugins/slxos-plugin')

diff --git a/os-plugins/slxos-plugin b/os-plugins/slxos-plugin
index eb350320..182a3b33 100755
--- a/os-plugins/slxos-plugin
+++ b/os-plugins/slxos-plugin
@@ -132,6 +132,9 @@ if ($action =~ m[^list-at]i) {
     }
     my $vendorOSName = shift @ARGV;
     
+    # for convenience, we alias default to <<<default>>>
+    $vendorOSName = '<<<default>>>' if $vendorOSName eq 'default';
+
     # we chdir into the script's folder such that all relative paths have
     # a known starting point:
     chdir($FindBin::RealBin)
@@ -194,6 +197,9 @@ if ($action =~ m[^list-at]i) {
     my $vendorOSName = shift @ARGV;
     my $pluginAttrs  = parsePluginAttrs(1);
 
+    # for convenience, we alias default to <<<default>>>
+    $vendorOSName = '<<<default>>>' if $vendorOSName eq 'default';
+
     # we chdir into the script's folder such that all relative paths have
     # a known starting point:
     chdir($FindBin::RealBin)
@@ -230,6 +236,10 @@ if ($action =~ m[^list-at]i) {
         pod2usage(2);
     }
     my $vendorOSName = shift @ARGV;
+
+    # for convenience, we alias default to <<<default>>>
+    $vendorOSName = '<<<default>>>' if $vendorOSName eq 'default';
+    
     my $pluginAttrs  = parsePluginAttrs(0);
 
     # we chdir into the script's folder such that all relative paths have
-- 
cgit v1.2.3-55-g7522