--- loncom/interface/lonerrorhandler.pm	2005/02/17 08:50:20	1.6
+++ loncom/interface/lonerrorhandler.pm	2005/04/07 06:56:23	1.7
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Internal Server Error Handler
 #
-# $Id: lonerrorhandler.pm,v 1.6 2005/02/17 08:50:20 albertel Exp $
+# $Id: lonerrorhandler.pm,v 1.7 2005/04/07 06:56:23 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -31,6 +31,7 @@ package Apache::lonerrorhandler;
 use strict;
 use Apache::Constants qw(:common);
 use Apache::loncommon;
+use Apache::lonnet;
 
 sub handler {
     my $r = shift;
@@ -42,7 +43,10 @@ sub handler {
      my $envkey;
      my $env='';
  
-     foreach $envkey (sort keys %ENV) {
+     foreach $envkey (sort(keys(%env))) {
+ 	$env.="$envkey: $env{$envkey}\n";
+     }
+     foreach $envkey (sort(keys(%ENV))) {
  	$env.="$envkey: $ENV{$envkey}\n";
      }