rat/lonsequence.pm - diff

Return to lonsequence.pm CVS log

Up to [LON-CAPA] / rat

Diff for /rat/lonsequence.pm between versions 1.21 and 1.23

version 1.21, 2004/10/16 01:14:28	version 1.23, 2005/03/01 00:22:57
Line 28	Line 28
#	#
# (Handler to resolve ambiguous file locations	# (Handler to resolve ambiguous file locations
#	#
# (TeX Content Handler
#
# 05/29/00,05/30,10/11 Gerd Kortemeyer)
#
# 10/11,10/12 Gerd Kortemeyer)
#
# 10/16 Gerd Kortemeyer

package Apache::lonsequence;	package Apache::lonsequence;

Line 259 sub handler {	Line 252 sub handler {
my $direction='';	my $direction='';
my $prevmap='';	my $prevmap='';
if ($last) {	if ($last) {
($prevmap,$direction)=(split(/\_\_\_/,$last));	($prevmap,undef,$direction)=&Apache::lonnet::decode_symb($last);
}	}
# ------------------------------------------------------------- Tie big db file	# ------------------------------------------------------------- Tie big db file
if (tie(%bighash,'GDBM_File',$ENV{'request.course.fn'}.'.db',	if (tie(%bighash,'GDBM_File',$ENV{'request.course.fn'}.'.db',
Line 306 sub handler {	Line 299 sub handler {
# now either disurl is set (going to first page), or we need another display	# now either disurl is set (going to first page), or we need another display
if ($disurl) {	if ($disurl) {
# -------------------------------------------------- Has first or last resource	# -------------------------------------------------- Has first or last resource
&Apache::lonnet::symblist($requrl,$disurl => $dismapid,	&Apache::lonnet::symblist($requrl,$disurl => [$disurl,$dismapid],
'last_known' => &Apache::lonnet::declutter($disurl));	'last_known' => [$disurl,$dismapid]);
&Apache::loncommon::content_type($r,'text/html');	&Apache::loncommon::content_type($r,'text/html');
$r->header_out(Location => 'http://'.$ENV{'HTTP_HOST'}.$disurl);	$r->header_out(Location => 'http://'.$ENV{'HTTP_HOST'}.$disurl);
return REDIRECT;	return REDIRECT;

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

Removed from v.1.21
changed lines
	Added in v.1.23