loncom/interface/lonhelp.pm - diff

Return to lonhelp.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.26, 2006/05/23 18:13:07	version 1.27, 2006/05/30 12:46:09
Line 1	Line 1
# The LearningOnline Network with CAPA	# The LearningOnline Network with CAPA
	#
	# $Id$
	#
# .tex help system web server handler	# .tex help system web server handler
#	#
# Copyright Michigan State University Board of Trustees	# Copyright Michigan State University Board of Trustees
Line 24	Line 27
# http://www.lon-capa.org/	# http://www.lon-capa.org/
#	#
# .tex file help handler	# .tex file help handler
# YEAR=2002
# 7/4 Jeremy Bowers

package Apache::lonhelp;	package Apache::lonhelp;

Line 40 use Apache::lonlocal;	Line 42 use Apache::lonlocal;
use Apache::lonnet;	use Apache::lonnet;
use tth();	use tth();
use GDBM_File();	use GDBM_File();
	use lib '/home/httpd/lib/perl/';
	use LONCAPA;


# This sub takes the name of a label in, and converts it to something	# This sub takes the name of a label in, and converts it to something
# that is a valid anchor name.	# that is a valid anchor name.
Line 199 sub handler {	Line 204 sub handler {
$text=&listmatches($docroot,$env{'form.searchterm'});	$text=&listmatches($docroot,$env{'form.searchterm'});
}	}
} else {	} else {
my $filenames = &Apache::lonnet::unescape(substr ($ENV{'REQUEST_URI'} ,	my $filenames = &unescape(substr ($ENV{'REQUEST_URI'} ,
rindex($ENV{'REQUEST_URI'}, '/') + 1, -4));	rindex($ENV{'REQUEST_URI'}, '/') + 1, -4));

# Security check on the file; the whole filename must consist	# Security check on the file; the whole filename must consist