![[BACK]](/icons/back.gif){kind=icon}
Return to lonsearchcat.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface|
Return to lonsearchcat.pm CVS log | Up to [LON-CAPA] / loncom / interface |
| version 1.102, 2001/10/17 03:31:34 | version 1.103, 2001/11/01 15:59:11 |
|---|---|
| Line 202 my $domain = ""; | Line 202 my $domain = ""; |
| # ----------------------------- Handling routine called via Apache and mod_perl | # ----------------------------- Handling routine called via Apache and mod_perl |
| sub handler { | sub handler { |
| my $r = shift; | my $r = shift; |
| untie %hash; | |
| &get_unprocessed_cgi(); | &get_unprocessed_cgi(); |
| $r->content_type('text/html'); | $r->content_type('text/html'); |