[Koha-cvs] CVS: koha/acqui.simple addbiblio.pl,1.52.2.11,1.52.2.12

[Henri-Damien LAURENT]

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

Modified Files:
      Tag: rel_2_2
	addbiblio.pl 
Log Message:
Adding Log Facility for Biblio management.
Note that a javascript will soon be written for action type management and that viewlog.pl is fully functionnal (tested) only for Catalogue.


Index: addbiblio.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui.simple/addbiblio.pl,v
retrieving revision 1.52.2.11
retrieving revision 1.52.2.12
diff -C2 -r1.52.2.11 -r1.52.2.12
*** addbiblio.pl	8 Aug 2005 09:18:57 -0000	1.52.2.11
--- addbiblio.pl	24 Aug 2005 10:44:53 -0000	1.52.2.12
***************
*** 22,25 ****
--- 22,26 ----
  use strict;
  use CGI;
+ use C4::Log;
  use C4::Auth;
  use C4::Output;
***************
*** 442,447 ****
--- 443,450 ----
  			NEWmodbiblioframework($dbh,$bibid,$frameworkcode);
  			NEWmodbiblio($dbh,$record,$bibid,$frameworkcode);
+ 			logaction($loggedinuser,"acqui.simple","modify",$bibid,"record : ".$record->as_formatted) if (logstatus());
  		} else {
  			($bibid,$oldbibnum,$oldbibitemnum) = NEWnewbiblio($dbh,$record,$frameworkcode);
+ 			logaction($loggedinuser,"acqui.simple","add",$bibid,"record : ".$record->as_formatted) if (logstatus());
  		}
  	# now, redirect to additem page