[Koha-patches] [PATCH] replacement for bug 3817 added patron permissions for tag tool

[Nicole Engard]

>From ebc6444b46798b0d46ac3230411e78b2aca272d4 Mon Sep 17 00:00:00 2001
From: Nicole Engard <nengard at gmail.com>
Date: Wed, 2 Dec 2009 10:02:49 -0500
Subject: [PATCH] replacement for bug 3817 added patron permissions for tag tool
Content-Type: text/plain; charset="utf-8"

---
 .../data/mysql/en/mandatory/userpermissions.sql    |    1 +
 installer/data/mysql/updatedatabase.pl             |    7 +++++++
 .../intranet-tmpl/prog/en/includes/tools-menu.inc  |    3 ++-
 .../prog/en/modules/tools/tools-home.tmpl          |    2 +-
 tags/review.pl                                     |    2 +-
 5 files changed, 12 insertions(+), 3 deletions(-)

diff --git a/installer/data/mysql/en/mandatory/userpermissions.sql
b/installer/data/mysql/en/mandatory/userpermissions.sql
index 31e90b1..1f61cb8 100644
--- a/installer/data/mysql/en/mandatory/userpermissions.sql
+++ b/installer/data/mysql/en/mandatory/userpermissions.sql
@@ -31,6 +31,7 @@ INSERT INTO permissions (module_bit, code, description) VALUES
    (13, 'batchmod', 'Perform batch modification of items'),
    (13, 'batchdel', 'Perform batch deletion of items'),
    (13, 'manage_csv_profiles', 'Manage CSV export profiles'),
+   (13, 'moderate_tags', 'Moderate patron tags'),
    (16, 'execute_reports', 'Execute SQL reports'),
    (16, 'create_reports', 'Create SQL Reports')
 ;
diff --git a/installer/data/mysql/updatedatabase.pl
b/installer/data/mysql/updatedatabase.pl
index 4c039cc..a5c5492 100755
--- a/installer/data/mysql/updatedatabase.pl
+++ b/installer/data/mysql/updatedatabase.pl
@@ -3305,6 +3305,13 @@ if (C4::Context->preference("Version") <
TransformToNum($DBversion)) {
     SetVersion ($DBversion);
 }

+$DBversion = "XXX";
+if (C4::Context->preference("Version") < TransformToNum($DBversion)) {
+	$dbh->do("INSERT INTO permissions (module_bit, code, description)
VALUES (13, 'moderate_tags', 'Moderate patron tags')");
+	print "Upgrade done (adding patron permissions for tags tool)\n";
+    SetVersion ($DBversion);
+}
+
 =item DropAllForeignKeys($table)

   Drop all foreign keys of the table $table
diff --git a/koha-tmpl/intranet-tmpl/prog/en/includes/tools-menu.inc
b/koha-tmpl/intranet-tmpl/prog/en/includes/tools-menu.inc
index e9298b6..c2314c1 100644
--- a/koha-tmpl/intranet-tmpl/prog/en/includes/tools-menu.inc
+++ b/koha-tmpl/intranet-tmpl/prog/en/includes/tools-menu.inc
@@ -29,7 +29,8 @@
     <!-- TMPL_IF NAME="CAN_user_tools_moderate_comments" -->
 	<li><a href="/cgi-bin/koha/reviews/reviewswaiting.pl">Moderate OPAC
comments</a></li>
     <!-- /TMPL_IF -->
-    <!-- TMPL_IF NAME="CAN_user_tools_moderate_comments" --><!--
FIXME: Update here when Tag specific permission is created. --><li><a
href="/cgi-bin/koha/tags/review.pl">Moderate patron tags</a></li>
+    <!-- TMPL_IF NAME="CAN_user_tools_moderate_tags" -->
+    <li><a href="/cgi-bin/koha/tags/review.pl">Moderate patron tags</a></li>
     <!-- /TMPL_IF -->
     <!-- TMPL_IF NAME="CAN_user_tools_manage_csv_profiles" -->
 	<li><a href="/cgi-bin/koha/tools/csv-profiles.pl">CSV Profiles</a></li>
diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/tools/tools-home.tmpl
b/koha-tmpl/intranet-tmpl/prog/en/modules/tools/tools-home.tmpl
index 090e172..c326b92 100644
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/tools/tools-home.tmpl
+++ b/koha-tmpl/intranet-tmpl/prog/en/modules/tools/tools-home.tmpl
@@ -40,7 +40,7 @@
 	<dd>Moderate patron comments</dd>
     <!-- /TMPL_IF -->

-    <!-- TMPL_IF NAME="CAN_user_tools_moderate_comments" --><!--
FIXME: Update here when Tag specific permission is created. -->
+    <!-- TMPL_IF NAME="CAN_user_tools_moderate_tags" -->
     <dt><a href="/cgi-bin/koha/tags/review.pl">Tags</a></dt>
 	<dd>Moderate patron tags</dd>
     <!-- /TMPL_IF -->
diff --git a/tags/review.pl b/tags/review.pl
index 421da4e..0667f3d 100755
--- a/tags/review.pl
+++ b/tags/review.pl
@@ -35,7 +35,7 @@ use C4::Debug;
 use C4::Tags 0.03 qw(get_tags get_approval_rows approval_counts
whitelist blacklist is_approved);

 my $script_name = "/cgi-bin/koha/tags/review.pl";
-my $needed_flags = { tools => 'moderate_comments' };	# FIXME: replace
when more specific permission is created.
+my $needed_flags = { tools => 'moderate_tags' };	# FIXME: replace
when more specific permission is created.

 sub ajax_auth_cgi ($) {		# returns CGI object
 	my $needed_flags = shift;
-- 
1.5.6.5
-------------- next part --------------
A non-text attachment was scrubbed...
Name: 0005-replacement-for-bug-3817-added-patron-permissions-fo.patch
Type: application/octet-stream
Size: 4348 bytes
Desc: not available
URL: </pipermail/koha-patches/attachments/20091202/196bb0de/attachment-0001.obj>