From 9352b0d8cef3a985bc78458ee7463ea6bf93302c Mon Sep 17 00:00:00 2001 From: Jamie Cameron Date: Sat, 16 Mar 2013 11:29:56 -0700 Subject: [PATCH] Handle nested clean calls --- web-lib-funcs.pl | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/web-lib-funcs.pl b/web-lib-funcs.pl index 8b3688c20..dd65903a9 100755 --- a/web-lib-funcs.pl +++ b/web-lib-funcs.pl @@ -7190,7 +7190,9 @@ reset_environment. =cut sub clean_language { -%UNCLEAN_ENV = %ENV; +if (!%UNCLEAN_ENV) { + %UNCLEAN_ENV = %ENV; + } $ENV{'LANG'} = ''; $ENV{'LANGUAGE'} = ''; $ENV{'LC_ALL'} = '';