diff options
author | Oliver Tappe | 2007-04-01 14:42:12 +0200 |
---|---|---|
committer | Oliver Tappe | 2007-04-01 14:42:12 +0200 |
commit | 44369cf1c57a006921c89a2cede8d0ba87b1d659 (patch) | |
tree | 6816fd8a9a165fa1b0a305b8ee7f5786ce3e1a07 /installer/slxos-setup | |
parent | Remove superfluous and empty test file. (diff) | |
download | core-44369cf1c57a006921c89a2cede8d0ba87b1d659.tar.gz core-44369cf1c57a006921c89a2cede8d0ba87b1d659.tar.xz core-44369cf1c57a006921c89a2cede8d0ba87b1d659.zip |
* circumvent dubious problem with perldoc in combination with UTF-8 that
leads to strange dashes and single-quotes being used, in result making it
impossible to copy'n'paste examples
git-svn-id: http://svn.openslx.org/svn/openslx/trunk@842 95ad53e4-c205-0410-b2fa-d234c58c8868
Diffstat (limited to 'installer/slxos-setup')
-rwxr-xr-x | installer/slxos-setup | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/installer/slxos-setup b/installer/slxos-setup index 081ea392..50b12f82 100755 --- a/installer/slxos-setup +++ b/installer/slxos-setup @@ -47,7 +47,12 @@ GetOptions( 'version' => \$versionReq, ) or pod2usage(2); pod2usage(-msg => $abstract, -verbose => 0, -exitval => 1) if $helpReq; -pod2usage(-verbose => 2) if $manReq; +if ($manReq) { + $ENV{LANG} = 'en_EN'; + # avoid dubious problem with perldoc in combination with UTF-8 that + # leads to strange dashes and single-quotes being used + pod2usage(-verbose => 2) +} if ($versionReq) { system('slxversion'); exit 1; |