loncom/interface/domainprefs.pm - diff

Return to domainprefs.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.337, 2018/08/14 21:42:39	version 1.338, 2018/08/14 22:15:20
Line 11162 sub modify_ltitools {	Line 11162 sub modify_ltitools {
if ($env{'form.ltitools_'.$extra.'_'.$i}) {	if ($env{'form.ltitools_'.$extra.'_'.$i}) {
$confhash{$itemid}{$extra} = 1;	$confhash{$itemid}{$extra} = 1;
if ($env{'form.ltitools_'.$extra.'valid_'.$i} ne '') {	if ($env{'form.ltitools_'.$extra.'valid_'.$i} ne '') {
my $lifetime = $env{'form.ltitools_'.$extra.'valid_add'};	my $lifetime = $env{'form.ltitools_'.$extra.'valid_'.$i};
$lifetime =~ s/^\s+\|\s+$//g;	$lifetime =~ s/^\s+\|\s+$//g;
if ($lifetime =~ /^\d+\.?\d*$/) {	if ($lifetime =~ /^\d+\.?\d*$/) {
$confhash{$itemid}{$extra.'valid'} = $lifetime;	$confhash{$itemid}{$extra.'valid'} = $lifetime;