[Koha-cvs] CVS: koha/authorities authorities.pl,1.3,1.4

[doXulting]

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

Modified Files:
        authorities.pl 
Log Message:
First step for working authorities

Index: authorities.pl
===================================================================
RCS file: /cvsroot/koha/koha/authorities/authorities.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -r1.3 -r1.4
*** authorities.pl      17 Jun 2004 08:19:20 -0000      1.3
--- authorities.pl      5 Jul 2004 13:38:41 -0000       1.4
***************
*** 341,344 ****
--- 341,345 ----
                ($authid) = 
AUTHaddauthority($dbh,$record,$authid,$authtypecode);
        }
+       print $input->redirect("authorities-home.pl");
  
#------------------------------------------------------------------------------------------------------------------------------
  } elsif ($op eq "addfield") {
***************
*** 424,426 ****
  
  $template->param(authtypesloop => address@hidden);
! output_html_with_http_headers $input, $cookie, $template->output;
\ No newline at end of file
--- 425,427 ----
  
  $template->param(authtypesloop => address@hidden);
! output_html_with_http_headers $input, $cookie, $template->output;