[BACK]Return to loncommon.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/loncommon.pm between versions 1.880 and 1.881

version 1.880, 2009/08/06 04:05:38 version 1.881, 2009/08/06 20:40:59
Line 602  sub userbrowser_javascript { Line 602  sub userbrowser_javascript {
     my $id_functions = &javascript_index_functions();      my $id_functions = &javascript_index_functions();
     return <<"ENDUSERBRW";      return <<"ENDUSERBRW";
   
 function openuserbrowser(formname,uname,udom,ulast,ufirst,uemail,hideudom) {  function openuserbrowser(formname,uname,udom,ulast,ufirst,uemail,hideudom,crsdom) {
     var url = '/adm/pickuser?';      var url = '/adm/pickuser?';
     var userdom = getDomainFromSelectbox(formname,udom);      var userdom = getDomainFromSelectbox(formname,udom);
     if (userdom != null) {      if (userdom != null) {
Line 615  function openuserbrowser(formname,uname, Line 615  function openuserbrowser(formname,uname,
                                 '&ulastelement='+ulast+                                  '&ulastelement='+ulast+
                                 '&ufirstelement='+ufirst+                                  '&ufirstelement='+ufirst+
                                 '&uemailelement='+uemail+                                  '&uemailelement='+uemail+
                                 '&hideudomelement='+hideudom;                                  '&hideudomelement='+hideudom+
                                   '&coursedom='+crsdom;
     var title = 'User_Browser';      var title = 'User_Browser';
     var options = 'scrollbars=1,resizable=1,menubar=0';      var options = 'scrollbars=1,resizable=1,menubar=0';
     options += ',width=700,height=600';      options += ',width=700,height=600';
Line 713  sub selectauthor_link { Line 714  sub selectauthor_link {
 }  }
   
 sub selectuser_link {  sub selectuser_link {
     my ($form,$unameelem,$domelem,$lastelem,$firstelem,$emailelem,$hdomelem,$linktext) = @_;      my ($form,$unameelem,$domelem,$lastelem,$firstelem,$emailelem,$hdomelem,
           $coursedom,$linktext) = @_;
     return '<a href="javascript:openuserbrowser('."'$form','$unameelem','$domelem',".      return '<a href="javascript:openuserbrowser('."'$form','$unameelem','$domelem',".
            "'$lastelem','$firstelem','$emailelem','$hdomelem'".');">'.$linktext.'</a>';             "'$lastelem','$firstelem','$emailelem','$hdomelem','$coursedom'".
              ');">'.$linktext.'</a>';
 }  }
   
 sub check_uncheck_jscript {  sub check_uncheck_jscript {
Removed from v.1.880  
changed lines
  Added in v.1.881

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>