diff options
-rwxr-xr-x | config-db/slxconfig | 7 | ||||
-rwxr-xr-x | config-db/slxconfig-demuxer | 7 | ||||
-rwxr-xr-x | installer/slxos-export | 7 | ||||
-rwxr-xr-x | installer/slxos-setup | 7 |
4 files changed, 24 insertions, 4 deletions
diff --git a/config-db/slxconfig b/config-db/slxconfig index 490dc7d7..46634065 100755 --- a/config-db/slxconfig +++ b/config-db/slxconfig @@ -49,7 +49,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; diff --git a/config-db/slxconfig-demuxer b/config-db/slxconfig-demuxer index 38e2a6d2..78b2a726 100755 --- a/config-db/slxconfig-demuxer +++ b/config-db/slxconfig-demuxer @@ -80,7 +80,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; diff --git a/installer/slxos-export b/installer/slxos-export index 30045ff7..ad8d98a3 100755 --- a/installer/slxos-export +++ b/installer/slxos-export @@ -48,7 +48,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; 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; |