[Koha-cvs] CVS: koha loadmodules.pl,1.18,1.19

[Paul POULAIN]

Update of /cvsroot/koha/koha
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv3680

Modified Files:
        loadmodules.pl 
Log Message:
improving behaviour when MARC=OFF

Index: loadmodules.pl
===================================================================
RCS file: /cvsroot/koha/koha/loadmodules.pl,v
retrieving revision 1.18
retrieving revision 1.19
diff -C2 -r1.18 -r1.19
*** loadmodules.pl      18 Jul 2003 03:04:41 -0000      1.18
--- loadmodules.pl      19 Nov 2004 16:41:49 -0000      1.19
***************
*** 69,85 ****
        my $query = new CGI;
        my $type = $query->param('type');
!       if ($keyword) {
!               if ($marc_p) {
                        print 
$input->redirect("/cgi-bin/koha/search.marc/search.pl?type=$type");
!               } else {
!                       print $input 
->redirect("/cgi-bin/koha/search.pl?keyword=$keyword");
!               }
!       } else {
!               if ($marc_p) {
!                       print 
$input->redirect("/cgi-bin/koha/search.marc/search.pl?type=$type");
!               } else {
!                       print $input 
->redirect("/cgi-bin/koha/catalogue-home.pl");
!               }
!       }
  }
  
--- 69,85 ----
        my $query = new CGI;
        my $type = $query->param('type');
! #     if ($keyword) {
! #             if ($marc_p) {
! #                     print 
$input->redirect("/cgi-bin/koha/search.marc/search.pl?type=$type");
! #             } else {
! #                     print $input 
->redirect("/cgi-bin/koha/search.pl?keyword=$keyword");
! #             }
! #     } else {
! #             if ($marc_p) {
                        print 
$input->redirect("/cgi-bin/koha/search.marc/search.pl?type=$type");
! #             } else {
! #                     print $input 
->redirect("/cgi-bin/koha/catalogue-home.pl");
! #             }
! #     }
  }