--- loncom/interface/loncommon.pm 2007/08/24 18:41:50 1.564.2.2 +++ loncom/interface/loncommon.pm 2007/08/23 21:54:40 1.566 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.564.2.2 2007/08/24 18:41:50 albertel Exp $ +# $Id: loncommon.pm,v 1.566 2007/08/23 21:54:40 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1084,6 +1084,67 @@ 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 for the onload and onresize events. + + +=cut + +sub resize_textarea_js { + return <<"RESIZE"; + +RESIZE + +} + +=pod + =back =head1 Excel and CSV file utility routines @@ -6925,7 +6986,7 @@ sub check_clone { $args->{'crstype'}); } else { my %clonedesc = &Apache::lonnet::coursedescription($cloneid,{'one_time' => 1}); - if ($env{'request.role.domain'} eq $args->{'clonedomain'}) { + if ($env{'request.role.domain'} eq $args->{'form.clonedomain'}) { $can_clone = 1; } else { my %clonehash = &Apache::lonnet::get('environment',['cloners'],