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

Diff for /loncom/interface/lonsearchcat.pm between versions 1.193 and 1.195

version 1.193, 2003/12/08 18:43:10 version 1.195, 2003/12/16 15:00:56
Line 549  if (&Apache::lonnet::allowed('bre',$ENV{ Line 549  if (&Apache::lonnet::allowed('bre',$ENV{
     my $Statement=&mt('Enter terms or phrases separated by AND, OR, or NOT then press SEARCH below');      my $Statement=&mt('Enter terms or phrases separated by AND, OR, or NOT then press SEARCH below');
     $scrout.=(<<ENDDOCUMENT);      $scrout.=(<<ENDDOCUMENT);
 <h1>$CatalogSearch</h1>  <h1>$CatalogSearch</h1>
 <form method="post" action="/adm/searchcat">  <form name="loncapa_search" method="post" action="/adm/searchcat">
 <input type="hidden" name="phase" value="basic_search" />  <input type="hidden" name="phase" value="basic_search" />
 $hidden_fields  $hidden_fields
 <p>  <p>
Line 602  ENDDOCUMENT Line 602  ENDDOCUMENT
         $scrout.=(<<ENDCOURSESEARCH);          $scrout.=(<<ENDCOURSESEARCH);
 <hr />  <hr />
 <h1>$lt{'header'}</h1>      <h1>$lt{'header'}</h1>    
 <form method="post" action="/adm/searchcat">  <form name="course_search" method="post" action="/adm/searchcat">
 <input type="hidden" name="phase" value="course_search" />  <input type="hidden" name="phase" value="course_search" />
 $hidden_fields  $hidden_fields
 <p>  <p>
Line 3190  sub start_fresh_session { Line 3190  sub start_fresh_session {
   
 sub cleanup {  sub cleanup {
     if (tied(%groupsearch_db)) {      if (tied(%groupsearch_db)) {
  &Apache::lonnet::logthis('Cleanup searchcat: groupsearch_db');  
         unless (untie(%groupsearch_db)) {          unless (untie(%groupsearch_db)) {
   &Apache::lonnet::logthis('Failed cleanup searchcat: groupsearch_db');    &Apache::lonnet::logthis('Failed cleanup searchcat: groupsearch_db');
         }          }
Removed from v.1.193  
changed lines
  Added in v.1.195

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