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

paul poulain paul at koha-fr.org
Fri Dec 22 18:10:10 CET 2006


CVSROOT:	/sources/koha
Module name:	koha
Branch:		rel_3_0
Changes by:	paul poulain <tipaul>	06/12/22 17:10:10

Modified files:
	C4             : Auth.pm 

Log message:
	removing "management" permission, that is useless (replaced by tools & admin)
	+ bigfix on insecure management

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Auth.pm?cvsroot=koha&only_with_tag=rel_3_0&r1=1.54.2.18&r2=1.54.2.19

Patches:
Index: Auth.pm
===================================================================
RCS file: /sources/koha/koha/C4/Auth.pm,v
retrieving revision 1.54.2.18
retrieving revision 1.54.2.19
diff -u -b -r1.54.2.18 -r1.54.2.19
--- Auth.pm	20 Dec 2006 16:50:48 -0000	1.54.2.18
+++ Auth.pm	22 Dec 2006 17:10:10 -0000	1.54.2.19
@@ -37,7 +37,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.18 $' =~ /\d+/g;
+$VERSION = do { my @v = '$Revision: 1.54.2.19 $' =~ /\d+/g;
     shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v );
 };
 
@@ -138,7 +138,7 @@
         # We are going to use the $flags returned by checkauth
         # to create the template's parameters that will indicate
         # which menus the user can access.
-        if (( $flags && $flags->{superlibrarian} == 1) or $insecure) {
+        if (( $flags && $flags->{superlibrarian} == 1) or $insecure == 1) {
             $template->param( CAN_user_circulate        => 1 );
             $template->param( CAN_user_catalogue        => 1 );
             $template->param( CAN_user_parameters       => 1 );
@@ -167,7 +167,6 @@
         if ( $flags && $flags->{parameters} == 1 ) {
             $template->param( CAN_user_parameters => 1 );
             $template->param( CAN_user_management => 1 );
-            $template->param( CAN_user_tools      => 1 );
         }
 
         if ( $flags && $flags->{borrowers} == 1 ) {
@@ -198,11 +197,6 @@
             $template->param( CAN_user_acquisition => 1 );
         }
 
-        if ( $flags && $flags->{management} == 1 ) {
-            $template->param( CAN_user_management => 1 );
-            $template->param( CAN_user_tools      => 1 );
-        }
-
         if ( $flags && $flags->{tools} == 1 ) {
             $template->param( CAN_user_tools => 1 );
         }





More information about the Koha-cvs mailing list