--- loncom/interface/lonconfigsettings.pm 2011/10/19 21:15:53 1.20 +++ loncom/interface/lonconfigsettings.pm 2011/12/08 22:10:18 1.21 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set domain-wide configuration settings # -# $Id: lonconfigsettings.pm,v 1.20 2011/10/19 21:15:53 www Exp $ +# $Id: lonconfigsettings.pm,v 1.21 2011/12/08 22:10:18 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -353,15 +353,11 @@ sub display_choices { sub color_pick_js { my $pjump_def = &Apache::lonhtmlcommon::pjump_javascript_definition(); my $output = <<"ENDCOL"; - 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.display.'+