incorporate suggestion by triska

diff --git a/src/lib/process.pl b/src/lib/process.pl
index d7bd15f9e702403a023892d4141f9a20a520753a..7a595c0bde0a4fce4bb5bae706d87d8567aaef5d 100644 (file)
--- a/src/lib/process.pl
+++ b/src/lib/process.pl
@@ -101,8 +101,7 @@ valid_env(environment(E)) :- (
     ).
 
 valid_env_([]).
-valid_env_([E| ES]) :- 
-    E =.. [=, N, V],
+valid_env_([N=V|ES]) :- 
     must_be(chars, N), 
     must_be(chars, V),
     valid_env_(ES).