version 1.566, 2007/08/23 21:54:40
|
version 1.569, 2007/08/25 19:52:29
|
Line 1099 to be attached to the <body> for the onl
|
Line 1099 to be attached to the <body> for the onl
|
sub resize_textarea_js { |
sub resize_textarea_js { |
return <<"RESIZE"; |
return <<"RESIZE"; |
<script type="text/javascript"> |
<script type="text/javascript"> |
function myHandleEvent (event) { |
|
alert(event.type); |
|
} |
|
|
|
var Geometry = {}; |
var Geometry = {}; |
function init_geometry() { |
function init_geometry() { |
if (Geometry.init) { return }; |
if (Geometry.init) { return }; |
Line 5646 sub user_picker {
|
Line 5642 sub user_picker {
|
'instd' => 'in institutional directory', |
'instd' => 'in institutional directory', |
'exact' => 'is', |
'exact' => 'is', |
'contains' => 'contains', |
'contains' => 'contains', |
|
'begins' => 'begins with', |
); |
); |
my $domform = &select_dom_form($currdom,'srchdomain',1,1); |
my $domform = &select_dom_form($currdom,'srchdomain',1,1); |
my $srchinsel = ' <select name="srchin">'; |
my $srchinsel = ' <select name="srchin">'; |
Line 5681 sub user_picker {
|
Line 5678 sub user_picker {
|
$srchbysel .= "\n </select>\n"; |
$srchbysel .= "\n </select>\n"; |
|
|
my $srchtypesel = ' <select name="srchtype">'; |
my $srchtypesel = ' <select name="srchtype">'; |
foreach my $option ('exact','contains') { |
foreach my $option ('exact','begins','contains') { |
if ($curr_selected{'srchtype'} eq $option) { |
if ($curr_selected{'srchtype'} eq $option) { |
$srchtypesel .= ' |
$srchtypesel .= ' |
<option value="'.$option.'" selected="selected">'.$lt{$option}.'</option>'; |
<option value="'.$option.'" selected="selected">'.$lt{$option}.'</option>'; |
Line 5750 function validateEntry() {
|
Line 5747 function validateEntry() {
|
msg += "You must include some text to search for.\\n"; |
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 (srchtype== 'contains') { |
if (srchterm.length < 3) { |
if (srchterm.length < 3) { |
checkok = 0; |
checkok = 0; |
Line 6986 sub check_clone {
|
Line 6990 sub check_clone {
|
$args->{'crstype'}); |
$args->{'crstype'}); |
} else { |
} else { |
my %clonedesc = &Apache::lonnet::coursedescription($cloneid,{'one_time' => 1}); |
my %clonedesc = &Apache::lonnet::coursedescription($cloneid,{'one_time' => 1}); |
if ($env{'request.role.domain'} eq $args->{'form.clonedomain'}) { |
if ($env{'request.role.domain'} eq $args->{'clonedomain'}) { |
$can_clone = 1; |
$can_clone = 1; |
} else { |
} else { |
my %clonehash = &Apache::lonnet::get('environment',['cloners'], |
my %clonehash = &Apache::lonnet::get('environment',['cloners'], |