From b8ac7f9ccb9de351c46c045505bf8558e423203e Mon Sep 17 00:00:00 2001
From: Ray Speth <speth@mit.edu>
Date: Wed, 15 Feb 2012 01:01:40 +0000
Subject: [PATCH] Added SCons options for propagating environment variables

---
 SConstruct | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/SConstruct b/SConstruct
index 1f89863c7..d95398a6a 100644
--- a/SConstruct
+++ b/SConstruct
@@ -409,6 +409,11 @@ opts.AddVariables(
         'lapack_ftn_trailing_underscore', '', True),
     BoolVariable(
         'lapack_ftn_string_len_at_end', '', True),
+    ('env_vars',
+     """Environment variables to propagate through to SCons. Either the
+        string "all" or a comma separated list of variable names, e.g.
+        'LD_LIBRARY_PATH,HOME'""",
+     ''),
     ('cxx_flags',
      'Compiler flags passed to the C++ compiler only.',
      defaults.cxxFlags),
@@ -527,6 +532,16 @@ env['OS'] = platform.system()
 
 env['OS_BITS'] = int(platform.architecture()[0][:2])
 
+# Copy in external environment variables
+if env['env_vars'] == 'all':
+    env['ENV'].update(os.environ)
+elif env['env_vars']:
+    for name in env['env_vars'].split(','):
+        if name in os.environ:
+            env['ENV'][name] = os.environ[name]
+        else:
+            print 'WARNING: failed to propagate environment variable', name
+
 # Try to find a Fortran compiler:
 if env['f90_interface'] in ('y','default'):
     foundF90 = False