Return to lonuserstate.pm CVS log

Up to [LON-CAPA] / rat

Diff for /rat/lonuserstate.pm between versions 1.133 and 1.135

version 1.133, 2009/11/15 21:31:23	version 1.135, 2010/03/25 17:38:52
Line 62 my %hiddenurl; # this URL (or complete f	Line 62 my %hiddenurl; # this URL (or complete f

# ----------------------------------- Remove version from URL and store in hash	# ----------------------------------- Remove version from URL and store in hash

	sub versionerror {
	my ($uri,$usedversion,$unusedversion)=@_;
	return '<br />'.&mt('Version discrepancy: resource [_1] included in both version [_2] and version [_3]. Using version [_2].',
	$uri,$usedversion,$unusedversion).'<br />';
	}

sub versiontrack {	sub versiontrack {
my $uri=shift;	my $uri=shift;
if ($uri=~/\.(\d+)\.\w+$/) {	if ($uri=~/\.(\d+)\.\w+$/) {
Line 69 sub versiontrack {	Line 75 sub versiontrack {
$uri=~s/\.\d+\.(\w+)$/\.$1/;	$uri=~s/\.\d+\.(\w+)$/\.$1/;
unless ($hash{'version_'.$uri}) {	unless ($hash{'version_'.$uri}) {
$hash{'version_'.$uri}=$version;	$hash{'version_'.$uri}=$version;
}	} elsif ($version!=$hash{'version_'.$uri}) {
	$errtext.=&versionerror($uri,$hash{'version_'.$uri},$version);
	}
}	}
return $uri;	return $uri;
}	}
Line 278 sub parse_resource {	Line 286 sub parse_resource {
$hash{'ids_'.$idsuri}=''.$rid;	$hash{'ids_'.$idsuri}=''.$rid;
}	}

if ($turi=~/\/(syllabus\|aboutme\|navmaps\|smppg\|bulletinboard)$/) {	if ($turi=~/\/(syllabus\|aboutme\|navmaps\|smppg\|bulletinboard\|viewclasslist)$/) {
$turi.='?register=1';	$turi.='?register=1';
}	}

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

500 Internal Server Error

Internal Server Error

The server encountered an internal error or misconfiguration and was unable to complete your request.

Please contact the server administrator at root@localhost to inform them of the time this error occurred, and the actions you performed just before this error.

More information about this error may be available in the server error log.

Removed from v.1.133
changed lines
	Added in v.1.135