Diff for /loncom/interface/loncommon.pm between versions 1.243 and 1.245

version 1.243, 2004/12/20 19:57:14 version 1.245, 2005/01/04 14:46:17
Line 696  function helpMenu(target) { Line 696  function helpMenu(target) {
     if (target == 'open') {      if (target == 'open') {
         var newWindow = null;          var newWindow = null;
         try {          try {
             newWindow =  window.open("","helpmenu","HEIGHT=$height,WIDTH=$width,resize=yes,scrollbars=yes" )              newWindow =  window.open("","helpmenu","HEIGHT=$height,WIDTH=$width,resizable=yes,scrollbars=yes" )
         }          }
         catch(error) {          catch(error) {
             writeHelp(caller);              writeHelp(caller);
Line 2706  ENDROLE Line 2706  ENDROLE
     if ($customtitle) {      if ($customtitle) {
         $titleinfo = $customtitle;          $titleinfo = $customtitle;
     }      }
       #
       # Extra info if you are the DC
       my $dc_info = '';
       if ($ENV{'user.adv'} && exists($ENV{'user.role.dc./'.
                           $ENV{'course.'.$ENV{'request.course.id'}.
                                    '.domain'}.'/'})) {
           my $cid = $ENV{'request.course.id'};
           $dc_info.= $cid.' '.$ENV{'course.'.$cid.'.internal.coursecode'};
           $dc_info = '('.$dc_info.')';
       }
       #
     return(<<ENDBODY);      return(<<ENDBODY);
 $bodytag  $bodytag
 <table width="100%" cellspacing="0" border="0" cellpadding="0">  <table width="100%" cellspacing="0" border="0" cellpadding="0">
Line 2715  $upperleft</td> Line 2726  $upperleft</td>
 </tr>  </tr>
 <tr>  <tr>
 <td rowspan="3" bgcolor="$tabbg">  <td rowspan="3" bgcolor="$tabbg">
 $titleinfo  $titleinfo $dc_info
 <td bgcolor="$tabbg" align="right">  <td bgcolor="$tabbg" align="right">
 <font size="2" face="Arial, Helvetica, sans-serif">  <font size="2" face="Arial, Helvetica, sans-serif">
     $ENV{'environment.firstname'}      $ENV{'environment.firstname'}

Removed from v.1.243  
changed lines
  Added in v.1.245


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