From 5b26a7ef809bfb77b97f626869086b27312ede87 Mon Sep 17 00:00:00 2001
From: "G. Richardson" <information@kivitendo-premium.de>
Date: Fri, 12 Jun 2015 14:49:42 +0200
Subject: [PATCH] =?utf8?q?Rechte=20f=C3=BCr=20Bankbewegungen=20in=20Banker?=
 =?utf8?q?weiterung=20setzen?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

Als sinnvollen Default erhalten beim Upgrade Gruppen, die schon das
Recht für "Zahlungseingang, Zahlungsausgang, Kontenabgleich" (cash)
besitzen, auch alle Rechte für die Bankerweiterung, also die Arbeit mit
den importierten Bankbewegungen.
---
 .../bank_transaction_rights.pl                | 26 +++++++++++++++++++
 1 file changed, 26 insertions(+)
 create mode 100644 sql/Pg-upgrade2-auth/bank_transaction_rights.pl

diff --git a/sql/Pg-upgrade2-auth/bank_transaction_rights.pl b/sql/Pg-upgrade2-auth/bank_transaction_rights.pl
new file mode 100644
index 000000000..e3e048a13
--- /dev/null
+++ b/sql/Pg-upgrade2-auth/bank_transaction_rights.pl
@@ -0,0 +1,26 @@
+# @tag: bank_transaction_rights
+# @description: Setzt das neue Recht die Bankerweiterung zu nutzen (für Gruppen die auch Recht Kontenabgleich haben)
+# @depends: release_3_2_0
+package SL::DBUpgrade2::bank_transaction_rights;
+
+use strict;
+use utf8;
+
+use parent qw(SL::DBUpgrade2::Base);
+
+use SL::DBUtils;
+
+sub run {
+  my ($self) = @_;
+
+  my $groups = $main::auth->read_groups();
+
+  foreach my $group (values %{$groups}) {
+    $group->{rights}->{bank_transaction} = $group->{rights}->{cash};
+    $main::auth->save_group($group);
+  }
+
+  return 1;
+} # end run
+
+1;
-- 
2.20.1