loncom/interface/courseprefs.pm - diff

Return to courseprefs.pm CVS log

Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/courseprefs.pm between versions 1.95 and 1.98

version 1.95, 2021/12/24 11:07:42	version 1.98, 2022/02/01 18:23:24
Line 1164 sub process_changes {	Line 1164 sub process_changes {
$autocoowner = $domconf{'autoenroll'}{'co-owners'};	$autocoowner = $domconf{'autoenroll'}{'co-owners'};
}	}
}	}
unless ($autocoowner) {	if ($autocoowner) {
	$newvalues{'co-owners'} = $values->{'internal.co-owners'};
	} else {
my @keepcoowners = &Apache::loncommon::get_env_multiple('form.coowners');	my @keepcoowners = &Apache::loncommon::get_env_multiple('form.coowners');
my @pendingcoowners = &Apache::loncommon::get_env_multiple('form.pendingcoowners');	my @pendingcoowners = &Apache::loncommon::get_env_multiple('form.pendingcoowners');
my @invitecoowners = &Apache::loncommon::get_env_multiple('form.invitecoowners');	my @invitecoowners = &Apache::loncommon::get_env_multiple('form.invitecoowners');
Line 1209 sub process_changes {	Line 1211 sub process_changes {
if ($pendingcoowners ne '') {	if ($pendingcoowners ne '') {
@newpending = @pendingcoown;	@newpending = @pendingcoown;
}	}
	} else {
	@newcoown = @currcoown;
}	}
$newvalues{'pendingco-owners'} = join(',',sort(@newpending));	$newvalues{'pendingco-owners'} = join(',',sort(@newpending));
$newvalues{'co-owners'} = join(',',sort(@newcoown));	$newvalues{'co-owners'} = join(',',sort(@newcoown));
Line 3806 sub coowner_invitations {	Line 3810 sub coowner_invitations {
@pendingcoown = split(',',$pendingcoowners);	@pendingcoown = split(',',$pendingcoowners);
}	}
if (ref($currcoownref) eq 'ARRAY') {	if (ref($currcoownref) eq 'ARRAY') {
@currcoown == @{$currcoownref};	@currcoown = @{$currcoownref};
}	}
my $disabled;	my $disabled;
if ($noedit) {	if ($noedit) {
Line 3870 sub manage_coownership {	Line 3874 sub manage_coownership {
@pendingcoown = split(',',$pendingcoowners);	@pendingcoown = split(',',$pendingcoowners);
}	}
if (ref($currcoownref) eq 'ARRAY') {	if (ref($currcoownref) eq 'ARRAY') {
@currcoown == @{$currcoownref};	@currcoown = @{$currcoownref};
}	}
my $disabled;	my $disabled;
if ($noedit) {	if ($noedit) {
Line 5301 sub print_linkprotection {	Line 5305 sub print_linkprotection {
'<label><input type="checkbox" name="linkprot_del" value="'.$i.'"'.$disabled.' />'.	'<label><input type="checkbox" name="linkprot_del" value="'.$i.'"'.$disabled.' />'.
&mt('Delete?').'</label></span></td>'.	&mt('Delete?').'</label></span></td>'.
'<td><span class="LC_nobreak">'.$lt{'name'}.	'<td><span class="LC_nobreak">'.$lt{'name'}.
':<input type="text" size="15" name="linkprot_name_'.$i.'" value="'.$values{'name'}.'"'.$disabled.' /></span> '.	':<input type="text" size="15" name="linkprot_name_'.$i.'" value="'.$values{'name'}.'" autocomplete="off"'.$disabled.' /></span> '.
(' 'x2).	(' 'x2).
'<span class="LC_nobreak">'.$lt{'version'}.':<select name="linkprot_version_'.$i.'">'.	'<span class="LC_nobreak">'.$lt{'version'}.':<select name="linkprot_version_'.$i.'">'.
'<option value="LTI-1p0" '.$selected.'>1.1</option></select></span> '."\n".	'<option value="LTI-1p0" '.$selected.'>1.1</option></select></span> '."\n".
Line 5310 sub print_linkprotection {	Line 5314 sub print_linkprotection {
'value="'.$values{'lifetime'}.'" size="3"'.$disabled.' /></span>'.	'value="'.$values{'lifetime'}.'" size="3"'.$disabled.' /></span>'.
'<br /><br />'.	'<br /><br />'.
'<span class="LC_nobreak">'.$lt{'key'}.	'<span class="LC_nobreak">'.$lt{'key'}.
':<input type="text" size="25" name="linkprot_key_'.$i.'" value="'.$values{'key'}.'"'.$disabled.' /></span> '.	':<input type="text" size="25" name="linkprot_key_'.$i.'" value="'.$values{'key'}.'" autocomplete="off"'.$disabled.' /></span> '.
(' 'x2).	(' 'x2).
'<span class="LC_nobreak">'.$lt{'secret'}.':'.	'<span class="LC_nobreak">'.$lt{'secret'}.':'.
'<input type="password" size="20" name="linkprot_secret_'.$i.'" value="'.$values{'secret'}.'"'.$disabled.' />'.	'<input type="password" size="20" name="linkprot_secret_'.$i.'" value="'.$values{'secret'}.'" autocomplete="off"'.$disabled.' />'.
'<label><input type="checkbox" name="visible" onclick="if (this.checked) { this.form.linkprot_secret_'.$i.'.type='."'text'".' } else { this.form.linkprot_secret_'.$i.'.type='."'password'".' }" />'.&mt('Visible input').'</label>'.	'<label><input type="checkbox" name="visible" onclick="if (this.checked) { this.form.linkprot_secret_'.$i.'.type='."'text'".' } else { this.form.linkprot_secret_'.$i.'.type='."'password'".' }"'.$disabled.' />'.&mt('Visible input').'</label>'.
'<input type="hidden" name="linkprot_id_'.$i.'" value="'.$num.'" /></span>'.	'<input type="hidden" name="linkprot_id_'.$i.'" value="'.$num.'" /></span>'.
'</td></tr>';	'</td></tr>';
$itemcount ++;	$itemcount ++;
Line 5324 sub print_linkprotection {	Line 5328 sub print_linkprotection {
$css_class = $itemcount%2?' class="LC_odd_row"':'';	$css_class = $itemcount%2?' class="LC_odd_row"':'';
$datatable .= '<tr '.$css_class.'><td><span class="LC_nobreak">'."\n".	$datatable .= '<tr '.$css_class.'><td><span class="LC_nobreak">'."\n".
'<input type="hidden" name="linkprot_maxnum" value="'.$next.'" />'."\n".	'<input type="hidden" name="linkprot_maxnum" value="'.$next.'" />'."\n".
'<input type="checkbox" name="linkprot_add" value="1" />'.&mt('Add').'</span></td>'."\n".	'<input type="checkbox" name="linkprot_add" value="1"'.$disabled.' />'.&mt('Add').'</span></td>'."\n".
'<td>'.	'<td>'.
'<span class="LC_nobreak">'.$lt{'name'}.	'<span class="LC_nobreak">'.$lt{'name'}.
':<input type="text" size="15" name="linkprot_name_add" value="" /></span> '."\n".	':<input type="text" size="15" name="linkprot_name_add" value="" autocomplete="off"'.$disabled.' /></span> '."\n".
(' 'x2).	(' 'x2).
'<span class="LC_nobreak">'.$lt{'version'}.':<select name="linkprot_version_add">'.	'<span class="LC_nobreak">'.$lt{'version'}.':<select name="linkprot_version_add"'.$disabled.'>'.
'<option value="LTI-1p0" selected="selected">1.1</option></select></span> '."\n".	'<option value="LTI-1p0" selected="selected">1.1</option></select></span> '."\n".
(' 'x2).	(' 'x2).
'<span class="LC_nobreak">'.$lt{'lifetime'}.':<input type="text" size="3" name="linkprot_lifetime_add" value="300" /></span> '."\n".	'<span class="LC_nobreak">'.$lt{'lifetime'}.':<input type="text" size="3" name="linkprot_lifetime_add" value="300"'.$disabled.' /></span> '."\n".
'<br /><br />'.	'<br /><br />'.
'<span class="LC_nobreak">'.$lt{'key'}.':<input type="text" size="25" name="linkprot_key_add" value="" /></span> '."\n".	'<span class="LC_nobreak">'.$lt{'key'}.':<input type="text" size="25" name="linkprot_key_add" value="" autocomplete="off"'.$disabled.' /></span> '."\n".
(' 'x2).	(' 'x2).
'<span class="LC_nobreak">'.$lt{'secret'}.':<input type="password" size="20" name="linkprot_secret_add" value="" />'.	'<span class="LC_nobreak">'.$lt{'secret'}.':<input type="password" size="20" name="linkprot_secret_add" value="" autocomplete="off"'.$disabled.' />'.
'<label><input type="checkbox" name="visible" onclick="if (this.checked) { this.form.linkprot_secret_add.type='."'text'".' } else { this.form.linkprot_secret_add.type='."'password'".' }" />'.&mt('Visible input').'</label></span> '."\n".	'<label><input type="checkbox" name="visible" onclick="if (this.checked) { this.form.linkprot_secret_add.type='."'text'".' } else { this.form.linkprot_secret_add.type='."'password'".' }"'.$disabled.' />'.&mt('Visible input').'</label></span> '."\n".
'</td></tr>';	'</td></tr>';
$$rowtotal ++;	$$rowtotal ++;
return $datatable;;	return $datatable;;

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

Removed from v.1.95
changed lines
	Added in v.1.98