|
version 1.130.4.1, 2010/03/19 22:22:34
|
version 1.133, 2010/03/25 17:38:35
|
|
Line 417 sub handler {
|
Line 417 sub handler {
|
| my $preserved; |
my $preserved; |
| foreach my $pair (split(/&/,$query)) { |
foreach my $pair (split(/&/,$query)) { |
| my ($name, $value) = split(/=/,$pair); |
my ($name, $value) = split(/=/,$pair); |
| unless (($name eq 'symb') || ($name eq 'wrapperdisplay')) { |
unless ($name eq 'symb') { |
| $preserved .= $pair.'&'; |
$preserved .= $pair.'&'; |
| } |
} |
| } |
} |
|
Line 501 sub handler {
|
Line 501 sub handler {
|
| $requrl=~/\.(\w+)$/; |
$requrl=~/\.(\w+)$/; |
| my $query=$r->args; |
my $query=$r->args; |
| if ((&Apache::loncommon::fileembstyle($1) eq 'ssi') || |
if ((&Apache::loncommon::fileembstyle($1) eq 'ssi') || |
| ($requrl=~/^\/adm\/.*\/(aboutme|navmaps|smppg|bulletinboard)(\?|$ )/x) || |
($requrl=~/^\/adm\/.*\/(aboutme|smppg|bulletinboard)(\?|$ )/x) || |
| ($requrl=~/^\/adm\/wrapper\//) || |
($requrl=~/^\/adm\/wrapper\//) || |
| ($requrl=~m|^/adm/coursedocs/showdoc/|) || |
($requrl=~m|^/adm/coursedocs/showdoc/|) || |
| ($requrl=~m|\.problem/smpedit$|) || |
($requrl=~m|\.problem/smpedit$|) || |
| ($requrl=~/^\/public\/.*\/syllabus$/)) { |
($requrl=~/^\/public\/.*\/syllabus$/) || |
| |
($requrl=~/^\/adm\/(viewclasslist|navmaps)$/)) { |
| # ------------------------------------- This is serious stuff, get symb and log |
# ------------------------------------- This is serious stuff, get symb and log |
| my $symb; |
my $symb; |
| if ($query) { |
if ($query) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonacc.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / auth