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'} = '';