summaryrefslogtreecommitdiffstats
path: root/config-db/slxsettings
diff options
context:
space:
mode:
authorOliver Tappe2007-04-08 13:46:26 +0200
committerOliver Tappe2007-04-08 13:46:26 +0200
commite784a1f8678436561cee9b4e2774b43fd3420901 (patch)
tree7533d1c30bbcbce803514d58814ca4b0ebb90010 /config-db/slxsettings
parent* db-type no longer requires exact case matching of the respective module nam... (diff)
downloadcore-e784a1f8678436561cee9b4e2774b43fd3420901.tar.gz
core-e784a1f8678436561cee9b4e2774b43fd3420901.tar.xz
core-e784a1f8678436561cee9b4e2774b43fd3420901.zip
* made output less confusing (use '' instead of <>)
git-svn-id: http://svn.openslx.org/svn/openslx/trunk@871 95ad53e4-c205-0410-b2fa-d234c58c8868
Diffstat (limited to 'config-db/slxsettings')
-rwxr-xr-xconfig-db/slxsettings16
1 files changed, 8 insertions, 8 deletions
diff --git a/config-db/slxsettings b/config-db/slxsettings
index 4a57307c..298c84aa 100755
--- a/config-db/slxsettings
+++ b/config-db/slxsettings
@@ -92,7 +92,7 @@ foreach my $key (sort keys %cmdlineConfig) {
# config-path can't be changed, it is used to find settings.local
my $value = $cmdlineConfig{$key};
next if !defined $value;
- vlog 0, _tr('setting %s to <%s>', $key, $value) unless $quiet;
+ vlog 0, _tr("setting %s to '%s'", $key, $value) unless $quiet;
$key =~ tr[-][_];
my $externalKey = "SLX_".uc($key);
if (!($settings =~ s[^\s*$externalKey=.*?$][$externalKey=$value]ms)) {
@@ -104,7 +104,7 @@ foreach my $key (sort keys %cmdlineConfig) {
# ...remove any keys we should do away with...
foreach my $key (@remove) {
if (!exists $cmdlineConfig{$key}) {
- vlog 0, _tr('ignoring unknown key <%s>', $key);
+ vlog 0, _tr("ignoring unknown key '%s'", $key);
next;
}
vlog 0, _tr('removing %s', $key) unless $quiet;
@@ -118,7 +118,7 @@ foreach my $key (@remove) {
if ($changeCount) {
my $f = "$openslxConfig{'config-path'}/settings.local";
open(SETTINGS, "> $f")
- or die _tr('Unable to write local settings file <%s> (%s)', $f, $!);
+ or die _tr("Unable to write local settings file '%s' (%s)", $f, $!);
print SETTINGS $settings;
close(SETTINGS);
}
@@ -129,7 +129,7 @@ if (scalar(keys %cmdlineSettings) > 0) {
$openslxDB->changeSettings({ $key => $cmdlineSettings{$key} });
$changeCount++;
} else {
- die _tr("unknown settings key <%s>!\n", $key);
+ die _tr("unknown settings key '%s'!\n", $key);
}
}
$currSettings = $openslxDB->fetchSettings();
@@ -141,11 +141,11 @@ if ($verbose || !$changeCount) {
my $text = $changeCount ? "resulting settings:" : "current settings:";
print "\n"._tr($text)."\n";
foreach my $key (sort keys %openslxConfig) {
- print qq[\t$key="$openslxConfig{$key}"\n];
+ print qq[\t$key='$openslxConfig{$key}'\n];
}
print "slxconf:\n";
foreach my $key (sort keys %$currSettings) {
- print qq[\t$key="$currSettings->{$key}"\n];
+ print qq[\t$key='$currSettings->{$key}'\n];
}
}
@@ -191,9 +191,9 @@ slxsettings [options] [action ...]
=over 8
-=item B<< <openslx-option>=<value> >>
+=item B<< --<openslx-option>=<value> >>
-sets the specified openslx-option (without the leading '--') to the given value
+sets the specified openslx-option to the given value
=item B<< remove=<openslx-option> >>