[LON-CAPA-cvs] cvs: loncom /interface loncreateuser.pm

[raeburn]

raeburn		Thu Dec 18 17:27:49 2008 EDT

  Modified files:              
    /loncom/interface	loncreateuser.pm 
  Log:
  - Only call &lonnet::appenv() to update 'availabletools' if there were changes. 
  
  
Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.270 loncom/interface/loncreateuser.pm:1.271
--- loncom/interface/loncreateuser.pm:1.270	Thu Dec 18 16:58:26 2008
+++ loncom/interface/loncreateuser.pm	Thu Dec 18 17:27:49 2008
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.270 2008/12/18 16:58:26 raeburn Exp $
+# $Id: loncreateuser.pm,v 1.271 2008/12/18 17:27:49 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2136,7 +2136,9 @@
                                     $changeHash{'tools.'.$key};
                             }
                         }
-                        &Apache::lonnet::appenv(\%newenvhash);
+                        if (keys(%newenvhash)) {
+                            &Apache::lonnet::appenv(\%newenvhash);
+                        }
                     }
                 }
             }