|
version 1.138, 2012/05/30 20:29:49
|
version 1.139, 2012/08/21 17:51:58
|
|
Line 156 sub get_posted_cgi {
|
Line 156 sub get_posted_cgi {
|
| for ($i=0;$i<=$#lines;$i++) { |
for ($i=0;$i<=$#lines;$i++) { |
| if ($lines[$i]=~/^--\Q$contentsep\E/) { |
if ($lines[$i]=~/^--\Q$contentsep\E/) { |
| if ($name) { |
if ($name) { |
| $value=~s/[\r\n]+$//; |
chomp($value); |
| |
if (($r->uri eq '/adm/portfolio') && |
| |
($name eq 'uploaddoc')) { |
| |
if (length($value) == 1) { |
| |
$value=~s/[\r\n]$//; |
| |
} |
| |
} |
| if (ref($fields) eq 'ARRAY') { |
if (ref($fields) eq 'ARRAY') { |
| next if (!grep(/^\Q$name\E$/,@{$fields})); |
next if (!grep(/^\Q$name\E$/,@{$fields})); |
| } |
} |
![[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