--- loncom/interface/loncreateuser.pm	2011/09/25 23:07:49	1.358
+++ loncom/interface/loncreateuser.pm	2011/12/08 22:10:18	1.359
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.358 2011/09/25 23:07:49 raeburn Exp $
+# $Id: loncreateuser.pm,v 1.359 2011/12/08 22:10:18 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -742,19 +742,13 @@ sub user_modification_js {
 <script type="text/javascript" language="Javascript">
 // <![CDATA[
 
-    function pclose() {
-        parmwin=window.open("/adm/rat/empty.html","LONCAPAparms",
-                 "height=350,width=350,scrollbars=no,menubar=no");
-        parmwin.close();
-    }
-
     $pjump_def
     $dc_setcourse_code
 
     function dateset() {
         eval("document.cu."+document.cu.pres_marker.value+
             ".value=document.cu.pres_value.value");
-        pclose();
+        modalWindow.close();
     }
 
     $nondc_setsection_code