[BACK]Return to lonsearchcat.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonsearchcat.pm between versions 1.1 and 1.2

version 1.1, 2001/01/03 16:20:59 version 1.2, 2001/03/08 13:32:04
Line 1 Line 1
 # The LearningOnline Network  # The LearningOnline Network
 # Search Catalog  # Search Catalog
 #  #
 # (Internal Server Error Handler  # 03/08/2001 Scott Harrison
 #  
 # (Login Screen  
 # 5/21/99,5/22,5/25,5/26,5/31,6/2,6/10,7/12,7/14,  
 # 1/14/00,5/29,5/30,6/1,6/29,7/1,11/9 Gerd Kortemeyer)  
 #  
 # 3/1/1 Gerd Kortemeyer)  
 #  
 # 3/1 Gerd Kortemeyer  
 #  #
 package Apache::lonsearchcat;  package Apache::lonsearchcat;
   
Line 22  sub handler { Line 14  sub handler {
     $r->send_http_header;      $r->send_http_header;
     return OK if $r->header_only;      return OK if $r->header_only;
   
 # --------------------------------------------------- Print login screen header  # ---------------------------------------------------------------- Print screen
     $r->print(<<ENDDOCUMENT);      $r->print(<<ENDDOCUMENT);
 <html>  <html>
 <head>  <head>
Line 30  sub handler { Line 22  sub handler {
 </head>  </head>
 <body bgcolor="#FFFFFF">  <body bgcolor="#FFFFFF">
 <h1>Search Catalog</h1>  <h1>Search Catalog</h1>
   <body bgcolor="#AAFFAA"><form>
 <img src="/adm/lonKaputt/lonconstruct.gif">  <img src="/adm/lonKaputt/lonconstruct.gif">
   <table width="100%">
   <tr><td><b>Resource Library Search</b></td>
   <td align=right><input type=button value="Close"
    onClick="javascript:opener.srchclose();"></td>
   </tr></table>
   <table bgcolor="#ffffff">
   <tr><td><b>title</b> </td>
   <td><INPUT TYPE="TEXT" NAME="title"></td>
   </tr><tr><td><b>author</b> </td>
   <td><INPUT TYPE="TEXT" NAME="author"></td>
   </tr><tr><td><b>subject</b> </td>
   <td><INPUT TYPE="TEXT" NAME="subject"></td>
   </tr><tr><td><b>notes</b> </td>
   <td><INPUT TYPE="TEXT" NAME="notes"></td>
   </tr><tr><td><b>abstract</b> </td>
   <td><INPUT TYPE="TEXT" NAME="abstract"></td>
   </tr><tr><td><b>mime</b> </td>
   <td><INPUT TYPE="TEXT" NAME="mime"></td>
   </tr><tr><td><b>language</b> </td>
   <td><INPUT TYPE="TEXT" NAME="language"></td>
   </tr><tr><td><b>creationdate</b> </td>
   <td><INPUT TYPE="TEXT" NAME="creationdate"></td>
   </tr><tr><td><b>lastrevisiondate</b> </td>
   <td><INPUT TYPE="TEXT" NAME="lastrevisiondate"></td>
   </tr><tr><td><b>owner</b> </td>
   <td><INPUT TYPE="TEXT" NAME="owner"></td>
   </tr><tr><td><b>copyright</b> </td>
   <td><INPUT TYPE="TEXT" NAME="copyright"></td>
   </tr>
   </table>
 </body>  </body>
 </html>  </html>
 ENDDOCUMENT  ENDDOCUMENT
Removed from v.1.1  
changed lines
  Added in v.1.2

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>