![[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|
Return to lonacc.pm CVS log | Up to [LON-CAPA] / loncom / auth |
| version 1.134, 2010/03/29 13:31:01 | version 1.135, 2010/10/29 20:41:49 |
|---|---|
| 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) { |
| chomp($value); | $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})); |
| } | } |