[Koha-cvs] koha/C4 Auth.pm Auth_with_ldap.pm [rel_3_0]

Antoine Farnault antoine at koha-fr.org
Tue Nov 21 11:44:28 CET 2006


CVSROOT:	/sources/koha
Module name:	koha
Branch:		rel_3_0
Changes by:	Antoine Farnault <toins>	06/11/21 10:44:28

Modified files:
	C4             : Auth.pm Auth_with_ldap.pm 

Log message:
	2 new userflags : reports & serials

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Auth.pm?cvsroot=koha&only_with_tag=rel_3_0&r1=1.54.2.10&r2=1.54.2.11
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Auth_with_ldap.pm?cvsroot=koha&only_with_tag=rel_3_0&r1=1.5.2.3&r2=1.5.2.4

Patches:
Index: Auth.pm
===================================================================
RCS file: /sources/koha/koha/C4/Auth.pm,v
retrieving revision 1.54.2.10
retrieving revision 1.54.2.11
diff -u -b -r1.54.2.10 -r1.54.2.11
--- Auth.pm	20 Nov 2006 18:09:51 -0000	1.54.2.10
+++ Auth.pm	21 Nov 2006 10:44:28 -0000	1.54.2.11
@@ -36,7 +36,7 @@
 use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
 
 # set the version for version checking
-$VERSION = do { my @v = '$Revision: 1.54.2.10 $' =~ /\d+/g;
+$VERSION = do { my @v = '$Revision: 1.54.2.11 $' =~ /\d+/g;
     shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v );
 };
 
@@ -150,6 +150,8 @@
             $template->param( CAN_user_management       => 1 );
             $template->param( CAN_user_tools            => 1 );	
             $template->param( CAN_user_editauthorities  => 1 );
+            $template->param( CAN_user_serials          => 1 );
+            $template->param( CAN_user_reports          => 1 );
         }
 
         if ( $flags && $flags->{circulate} == 1 ) {
@@ -207,6 +209,13 @@
             $template->param( CAN_user_editauthorities => 1 );
         }
 
+        if ( $flags && $flags->{serials} == 1 ) {
+            $template->param( CAN_user_serials => 1 );
+        }
+
+        if ( $flags && $flags->{reports} == 1 ) {
+            $template->param( CAN_user_reports => 1 );
+        }
     }
     if ( $in->{'type'} eq "intranet" ) {
         $template->param(

Index: Auth_with_ldap.pm
===================================================================
RCS file: /sources/koha/koha/C4/Auth_with_ldap.pm,v
retrieving revision 1.5.2.3
retrieving revision 1.5.2.4
diff -u -b -r1.5.2.3 -r1.5.2.4
--- Auth_with_ldap.pm	20 Nov 2006 18:09:51 -0000	1.5.2.3
+++ Auth_with_ldap.pm	21 Nov 2006 10:44:28 -0000	1.5.2.4
@@ -158,8 +158,9 @@
             $template->param( CAN_user_acquisition      => 1 );
             $template->param( CAN_user_management       => 1 );
             $template->param( CAN_user_tools            => 1 );
+            $template->param( CAN_user_serials          => 1 );
+            $template->param( CAN_user_reports          => 1 );
         }
-
         if ( $flags && $flags->{circulate} == 1 ) {
             $template->param( CAN_user_circulate => 1 );
         }
@@ -213,6 +214,14 @@
         if ( $flags && $flags->{editauthorities} == 1 ) {
             $template->param( CAN_user_editauthorities => 1 );
         }
+
+        if ( $flags && $flags->{serials} == 1 ) {
+            $template->param( CAN_user_serials => 1 );
+        }
+
+        if ( $flags && $flags->{reports} == 1 ) {
+            $template->param( CAN_user_reports => 1 );
+        }
     }
     $template->param( LibraryName => C4::Context->preference("LibraryName"), );
     return ( $template, $borrowernumber, $cookie );





More information about the Koha-cvs mailing list