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

Diff for /loncom/interface/lonhtmlcommon.pm between versions 1.160 and 1.163

version 1.160, 2007/07/11 20:32:15 version 1.163, 2007/09/26 12:42:32
Line 1006  sub crumbs { Line 1006  sub crumbs {
     }          }    
             my $href_path = &HTML::Entities::encode($path,'<>&"');              my $href_path = &HTML::Entities::encode($path,'<>&"');
     &Apache::loncommon::inhibit_menu_check(\$href_path);      &Apache::loncommon::inhibit_menu_check(\$href_path);
     $output.=qq{<a href="$href_path" $target>$dir</a>/};      if ($form) {
           my $href = 'javascript:'.$form.".action='".$href_path."';".$form.'.submit();';
           $output.=qq{<a href="$href" $target>$dir</a>/};
       } else {
           $output.=qq{<a href="$href_path" $target>$dir</a>/};
       }
  }   }
     } else {      } else {
  foreach my $dir (split('/',$uri)) {   foreach my $dir (split('/',$uri)) {
Line 1329  returns: nothing Line 1334  returns: nothing
 # row2  # row2
 # row3   ... etc.  # row3   ... etc.
 # &submit_row(0  # &submit_row(0
 # &end_pickbox()  # &end_pick_box()
 #  #
 # where row1, row 2 etc. are chosen from &role_select_row,&course_select_row,  # where row1, row 2 etc. are chosen from &role_select_row,&course_select_row,
 # &status_select_row and &email_default_row  # &status_select_row and &email_default_row
Line 1567  sub status_select_row { Line 1572  sub status_select_row {
 sub email_default_row {  sub email_default_row {
     my ($authtypes,$title,$descrip,$css_class) = @_;      my ($authtypes,$title,$descrip,$css_class) = @_;
     my $output = &row_title($title,$css_class);      my $output = &row_title($title,$css_class);
     my @rowcols = ('#eeeeee','#dddddd');  
     $output .= $descrip.      $output .= $descrip.
  &Apache::loncommon::start_data_table().   &Apache::loncommon::start_data_table().
  &Apache::loncommon::start_data_table_header_row().   &Apache::loncommon::start_data_table_header_row().
Line 1875  END Line 1879  END
     return $scripttag;      return $scripttag;
 }  }
   
   ##############################################
   ##############################################
   
   # javascript_window_dims
   #
   # Generates javascript to get the dimensions of the user's browser window.
   
   sub javascript_window_dims {
       my $scripttag .= <<'END';
   function getDimensions(width,height) {
       width.value = getWindowWidth();
       height.value = getWindowHeight();
       return;
   }
    
   function getWindowWidth() {
     var width = 0;
     if( document.documentElement && document.documentElement.clientWidth ) {
       width = document.documentElement.clientWidth;
     }
     else if( document.body && document.body.clientWidth ) {
       width = document.body.clientWidth;
     }
     else if( window.innerWidth ) {
       width = window.innerWidth - 18;
     }
     return width;
   }
   
   function getWindowHeight() {
     var height = 0;
     if( document.documentElement && document.documentElement.clientHeight ) {
       height = document.documentElement.clientHeight;
     }
     else if( document.body && document.body.clientHeight ) {
       height = document.body.clientHeight;
     }
     else if( window.innerHeight ) {
       height = window.innerHeight - 18;
     }
     return height;
   }
   
   END
       return $scripttag;
   }
 1;  1;
   
 __END__  __END__
Removed from v.1.160  
changed lines
  Added in v.1.163

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