2 files changed, 3 insertions, 1 deletions
diff --git a/NEWS b/NEWS
index bde5b94..f84d497 100644
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,5 @@
+- setVarsInSh*(): sort entries
+
 Version 1.2.31 - 21 December 2014, by Colin Guthrie
 
 - user filtering updates for system/real user boundary change
diff --git a/lib/MDK/Common/System.pm b/lib/MDK/Common/System.pm
index c0be561..e98b3c5 100644
--- a/lib/MDK/Common/System.pm
+++ b/lib/MDK/Common/System.pm
@@ -459,7 +459,7 @@ sub quoteForSh {
 
 sub setVarsInShMode {
     my ($file, $mod, $l, @fields) = @_;
-    @fields = keys %$l unless @fields;
+    @fields = sort keys %$l unless @fields;
     my $string = join('',
 	map { "$_=" . quoteForSh($l->{$_}) . "\n" } grep { $l->{$_} } @fields
     );