loncom/interface/lonaboutme.pm - diff

Return to lonaboutme.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.11, 2003/02/10 16:22:28	version 1.12, 2003/02/10 20:03:13
Line 33 use Apache::Constants qw(:common);	Line 33 use Apache::Constants qw(:common);
use Apache::loncommon;	use Apache::loncommon;
use Apache::lonnet;	use Apache::lonnet;
use Apache::lontexconvert;	use Apache::lontexconvert;
	use Apache::lonfeedback;

sub handler {	sub handler {
my $r = shift;	my $r = shift;
Line 89 ENDDOCUMENT	Line 90 ENDDOCUMENT

if ($allowed) {	if ($allowed) {
$r->print('<p><b>Privacy Note:</b> The information you submit can be viewed by anybody who is logged into LON-CAPA. Do not provide information that you are not ready to share publically.</p>'.	$r->print('<p><b>Privacy Note:</b> The information you submit can be viewed by anybody who is logged into LON-CAPA. Do not provide information that you are not ready to share publically.</p>'.
'<p><a href="'.$r->uri.'?forcestudent=1">Show Public View</a>'.	&Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes','Help with filling in text boxes').'</p><p><a href="'.$r->uri.'?forcestudent=1">Show Public View</a>'.
&Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView').'</p>');	&Apache::loncommon::help_open_topic('Uploaded_Templates_PublicView').'</p>');
}	}
if (($ENV{'form.uploaddoc.filename'}) &&	if (($ENV{'form.uploaddoc.filename'}) &&