loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/loncommon.pm between versions 1.564.2.2 and 1.569

-version 1.564.2.2, 2007/08/24 18:41:50
+version 1.569, 2007/08/25 19:52:29
  Line 1084  sub changable_area {
  =pod
+ =item * resize_textarea_js
+ emits the needed javascript to resize a textarea to be as big as possible
+ creates a function resize_textrea that takes two IDs first should be
+ the id of the element to resize, second should be the id of a div that
+ surrounds everything that comes after the textarea, this routine needs
+ to be attached to the <body> for the onload and onresize events.
+ =cut
+ sub resize_textarea_js {
+     return <<"RESIZE";
+     <script type="text/javascript">
+ var Geometry = {};
+ function init_geometry() {
+     if (Geometry.init) { return };
+     Geometry.init=1;
+     if (window.innerHeight) {
+ 	Geometry.getViewportHeight = function() { return window.innerHeight; };
+     }
+     else if (document.documentElement && document.documentElement.clientHeight) {
+ 	Geometry.getViewportHeight =
+ 	    function() { return document.documentElement.clientHeight; };
+     }
+     else if (document.body.clientHeight) {
+ 	Geometry.getViewportHeight =
+ 	    function() { return document.body.clientHeight; };
+     }
+ }
+ function resize_textarea(textarea_id,bottom_id) {
+     init_geometry();
+     var textarea        = document.getElementById(textarea_id);
+     //alert(textarea);
+     var textarea_top    = textarea.offsetTop;
+     var textarea_height = textarea.offsetHeight;
+     var bottom          = document.getElementById(bottom_id);
+     var bottom_top      = bottom.offsetTop;
+     var bottom_height   = bottom.offsetHeight;
+     var window_height   = Geometry.getViewportHeight();
+     var fudge           = 23;
+     var new_height      = window_height-fudge-textarea_top-bottom_height;
+     if (new_height < 300) {
+ 	new_height = 300;
+     }
+     textarea.style.height=new_height+'px';
+ }
+ </script>
+ RESIZE
+ }
+ =pod
  =back
  =head1 Excel and CSV file utility routines
- Line 5585  sub user_picker {
+ Line 5642  sub user_picker {
                      'instd'     => 'in institutional directory',
                      'exact'     => 'is',
                      'contains'  => 'contains',
+                     'begins'    => 'begins with',
                                         );
      my $domform = &select_dom_form($currdom,'srchdomain',1,1);
      my $srchinsel = ' <select name="srchin">';
- Line 5620  sub user_picker {
+ Line 5678  sub user_picker {
      $srchbysel .= "\n  </select>\n";
      my $srchtypesel = ' <select name="srchtype">';
-     foreach my $option ('exact','contains') {
+     foreach my $option ('exact','begins','contains') {
          if ($curr_selected{'srchtype'} eq $option) {
              $srchtypesel .= '
     <option value="'.$option.'" selected="selected">'.$lt{$option}.'</option>';
- Line 5689  function validateEntry() {
+ Line 5747  function validateEntry() {
          msg += "You must include some text to search for.\\n";
      }
+     if (srchtype== 'begins') {
+         if (srchterm.length < 2) {
+             checkok = 0;
+             msg += "The text you are searching for must contain at least two characters when using a 'begins' type search.\\n";
+         }
+     }
      if (srchtype== 'contains') {
          if (srchterm.length < 3) {
              checkok = 0;

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

Removed from v.1.564.2.2
changed lines
	Added in v.1.569