loncom/interface/lonhtmlcommon.pm - diff

Return to lonhtmlcommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

-version 1.162, 2007/09/14 23:24:18
+version 1.163, 2007/09/26 12:42:32
  Line 1879  END
      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;
+ }
 ;
  __END__