version 1.151, 2005/02/17 04:11:20
|
version 1.152, 2005/02/17 04:39:58
|
Line 1436 END
|
Line 1436 END
|
my $latexHelp=&Apache::loncommon::helpLatexCheatsheet(); |
my $latexHelp=&Apache::loncommon::helpLatexCheatsheet(); |
my $htmlheader=&Apache::lonhtmlcommon::htmlareaheaders(); |
my $htmlheader=&Apache::lonhtmlcommon::htmlareaheaders(); |
my $send=&mt('Send'); |
my $send=&mt('Send'); |
|
my $html=&Apache::lonxml::xmlbegin(); |
|
my $encoding=&Apache::lonxml::fontsettings(); |
$r->print(<<END); |
$r->print(<<END); |
<html> |
$html |
<head> |
<head> |
|
$encoding |
<title>The LearningOnline Network with CAPA</title> |
<title>The LearningOnline Network with CAPA</title> |
<meta http-equiv="pragma" content="no-cache"></meta> |
<meta http-equiv="pragma" content="no-cache"></meta> |
$htmlheader |
$htmlheader |
Line 1661 sub print_display_options {
|
Line 1664 sub print_display_options {
|
$currtogg = $lt{'toggon'}; |
$currtogg = $lt{'toggon'}; |
$disctogg = 'toggon'; |
$disctogg = 'toggon'; |
} |
} |
|
my $html=&Apache::lonxml::xmlbegin(); |
|
my $encoding=&Apache::lonxml::fontsettings(); |
$r->print(<<END); |
$r->print(<<END); |
<html> |
$html |
<head> |
<head> |
|
$encoding |
<title>$lt{'dido'}</title> |
<title>$lt{'dido'}</title> |
<meta http-equiv="pragma" content="no-cache" /> |
<meta http-equiv="pragma" content="no-cache" /> |
<script> |
<script> |
Line 1843 sub print_sortfilter_options {
|
Line 1849 sub print_sortfilter_options {
|
my %role_types = (); |
my %role_types = (); |
my %status_types = (); |
my %status_types = (); |
&sort_filter_names(\%sort_types,\%role_types,\%status_types); |
&sort_filter_names(\%sort_types,\%role_types,\%status_types); |
|
my $html=&Apache::lonxml::xmlbegin(); |
|
my $encoding=&Apache::lonxml::fontsettings(); |
$r->print(<<END); |
$r->print(<<END); |
<html> |
$html |
<head> |
<head> |
|
$encoding |
<title>$lt{'diso'}</title> |
<title>$lt{'diso'}</title> |
<meta http-equiv="pragma" content="no-cache" /> |
<meta http-equiv="pragma" content="no-cache" /> |
<script type="text/javascript"> |
<script type="text/javascript"> |
Line 1996 sub print_showposters {
|
Line 2004 sub print_showposters {
|
} |
} |
} |
} |
} |
} |
|
my $html=&Apache::lonxml::xmlbegin(); |
|
my $encoding=&Apache::lonxml::fontsettings(); |
$r->print(<<END); |
$r->print(<<END); |
<html> |
$html |
<head> |
<head> |
|
$encoding |
<title>$lt{'diso'}</title> |
<title>$lt{'diso'}</title> |
<meta http-equiv="pragma" content="no-cache" /> |
<meta http-equiv="pragma" content="no-cache" /> |
</head> |
</head> |
Line 2109 sub fail_redirect {
|
Line 2120 sub fail_redirect {
|
my ($r,$feedurl) = @_; |
my ($r,$feedurl) = @_; |
if ($feedurl=~/^\/adm\//) { $feedurl.='?register=1' }; |
if ($feedurl=~/^\/adm\//) { $feedurl.='?register=1' }; |
my $logo=&Apache::loncommon::lonhttpdurl('/adm/lonIcons/lonlogos.gif'); |
my $logo=&Apache::loncommon::lonhttpdurl('/adm/lonIcons/lonlogos.gif'); |
|
my $html=&Apache::lonxml::xmlbegin(); |
|
my $encoding=&Apache::lonxml::fontsettings(); |
$r->print (<<ENDFAILREDIR); |
$r->print (<<ENDFAILREDIR); |
<html> |
$html |
<head><title>Feedback not sent</title> |
<head> |
|
$encoding |
|
<title>Feedback not sent</title> |
<meta http-equiv="pragma" content="no-cache" /> |
<meta http-equiv="pragma" content="no-cache" /> |
<meta HTTP-EQUIV="Refresh" CONTENT="2; url=$feedurl" /> |
<meta HTTP-EQUIV="Refresh" CONTENT="2; url=$feedurl" /> |
</head> |
</head> |
Line 2195 sub redirect_back {
|
Line 2210 sub redirect_back {
|
} |
} |
$feedurl=&Apache::lonenc::check_encrypt($feedurl); |
$feedurl=&Apache::lonenc::check_encrypt($feedurl); |
my $logo=&Apache::loncommon::lonhttpdurl('/adm/lonIcons/lonlogos.gif'); |
my $logo=&Apache::loncommon::lonhttpdurl('/adm/lonIcons/lonlogos.gif'); |
|
my $html=&Apache::lonxml::xmlbegin(); |
|
my $encoding=&Apache::lonxml::fontsettings(); |
$r->print (<<ENDREDIR); |
$r->print (<<ENDREDIR); |
<html> |
$html |
<head> |
<head> |
|
$encoding |
<title>Feedback sent</title> |
<title>Feedback sent</title> |
<meta http-equiv="pragma" content="no-cache" /> |
<meta http-equiv="pragma" content="no-cache" /> |
<meta HTTP-EQUIV="Refresh" CONTENT="2; url=$feedurl" /> |
<meta HTTP-EQUIV="Refresh" CONTENT="2; url=$feedurl" /> |
Line 2225 sub no_redirect_back {
|
Line 2243 sub no_redirect_back {
|
my ($r,$feedurl) = @_; |
my ($r,$feedurl) = @_; |
my $nofeed=&mt('Sorry, no feedback possible on this resource ...'); |
my $nofeed=&mt('Sorry, no feedback possible on this resource ...'); |
my $continue=&mt('Continue'); |
my $continue=&mt('Continue'); |
|
my $html=&Apache::lonxml::xmlbegin(); |
|
my $encoding=&Apache::lonxml::fontsettings(); |
$r->print (<<ENDNOREDIR); |
$r->print (<<ENDNOREDIR); |
<html> |
$html |
<head><title>Feedback not sent</title> |
<head> |
|
$encoding |
|
<title>Feedback not sent</title> |
<meta http-equiv="pragma" content="no-cache" /> |
<meta http-equiv="pragma" content="no-cache" /> |
ENDNOREDIR |
ENDNOREDIR |
|
|
Line 2606 sub modify_attachments {
|
Line 2628 sub modify_attachments {
|
&extract_attachments($attachmenturls,$idx,$numoldver,\$msg,\%attachments,\%currattach,$currdelold); |
&extract_attachments($attachmenturls,$idx,$numoldver,\$msg,\%attachments,\%currattach,$currdelold); |
} |
} |
&Apache::lonenc::check_encrypt(\$symb); |
&Apache::lonenc::check_encrypt(\$symb); |
|
my $html=&Apache::lonxml::xmlbegin(); |
|
my $encoding=&Apache::lonxml::fontsettings(); |
$r->print(<<END); |
$r->print(<<END); |
<html> |
$html |
<head> |
<head> |
|
$encoding |
<title>Managing Attachments</title> |
<title>Managing Attachments</title> |
<script> |
<script> |
function setAction () { |
function setAction () { |
Line 2957 sub handler {
|
Line 2982 sub handler {
|
if ($ENV{'form.allversions'}) { |
if ($ENV{'form.allversions'}) { |
&Apache::loncommon::content_type($r,'text/html'); |
&Apache::loncommon::content_type($r,'text/html'); |
$r->send_http_header; |
$r->send_http_header; |
|
my $html=&Apache::lonxml::xmlbegin(); |
|
my $encoding=&Apache::lonxml::fontsettings(); |
my $bodytag=&Apache::loncommon::bodytag('Discussion Post Versions'); |
my $bodytag=&Apache::loncommon::bodytag('Discussion Post Versions'); |
$r->print(<<END); |
$r->print(<<END); |
<html> |
$html |
<head> |
<head> |
|
$encoding |
<title>Post Versions</title> |
<title>Post Versions</title> |
<meta http-equiv="pragma" content="no-cache" /> |
<meta http-equiv="pragma" content="no-cache" /> |
</head> |
</head> |
Line 3060 END
|
Line 3088 END
|
&Apache::loncommon::content_type($r,'text/html'); |
&Apache::loncommon::content_type($r,'text/html'); |
$r->send_http_header; |
$r->send_http_header; |
my $logo=&Apache::loncommon::lonhttpdurl('/adm/lonIcons/lonlogos.gif'); |
my $logo=&Apache::loncommon::lonhttpdurl('/adm/lonIcons/lonlogos.gif'); |
|
my $html=&Apache::lonxml::xmlbegin(); |
|
my $encoding=&Apache::lonxml::fontsettings(); |
$r->print (<<ENDREDIR); |
$r->print (<<ENDREDIR); |
<html> |
$html |
<head> |
<head> |
|
$encoding |
<title>New posts marked as read</title> |
<title>New posts marked as read</title> |
<meta http-equiv="pragma" content="no-cache" /> |
<meta http-equiv="pragma" content="no-cache" /> |
<meta HTTP-EQUIV="Refresh" CONTENT="2; url=$feedurl" /> |
<meta HTTP-EQUIV="Refresh" CONTENT="2; url=$feedurl" /> |