--- loncom/interface/lonpreferences.pm	2011/12/06 16:17:07	1.195
+++ loncom/interface/lonpreferences.pm	2011/12/08 21:52:32	1.196
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Preferences
 #
-# $Id: lonpreferences.pm,v 1.195 2011/12/06 16:17:07 dseaton Exp $
+# $Id: lonpreferences.pm,v 1.196 2011/12/08 21:52:32 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1207,16 +1207,10 @@ sub colorschanger {
     $r->print(<<ENDCOL);
 <script type="text/javascript" language="JavaScript">
 
-    function pclose() {
-        parmwin=window.open("/adm/rat/empty.html","LONCAPAparms",
-                 "height=350,width=350,scrollbars=no,menubar=no");
-        parmwin.close();
-    }
-
     $pjump_def
 
     function psub() {
-        pclose();
+        modalWindow.close();
         if (document.parmform.pres_marker.value!='') {
             if (document.parmform.pres_type.value!='') {
                 eval('document.prefs.'+