--- loncom/interface/lonhtmlcommon.pm	2007/09/14 23:24:18	1.162
+++ loncom/interface/lonhtmlcommon.pm	2007/09/26 12:42:32	1.163
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common html routines
 #
-# $Id: lonhtmlcommon.pm,v 1.162 2007/09/14 23:24:18 banghart Exp $
+# $Id: lonhtmlcommon.pm,v 1.163 2007/09/26 12:42:32 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1879,6 +1879,52 @@ 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;
+}
 1;
 
 __END__