From 6ebec7f9d7ddef3e7f8befb797314c89e1414635 Mon Sep 17 00:00:00 2001 From: "G. Richardson" Date: Tue, 6 Oct 2015 11:51:37 +0200 Subject: [PATCH] =?utf8?q?Rechtecheck=20f=C3=BCr=20BankImport=20Controller?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- SL/Controller/BankImport.pm | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/SL/Controller/BankImport.pm b/SL/Controller/BankImport.pm index 58faf85a1..867589f10 100644 --- a/SL/Controller/BankImport.pm +++ b/SL/Controller/BankImport.pm @@ -7,6 +7,7 @@ use SL::Locale::String qw(t8); use SL::DB::CsvImportProfile; use SL::Helper::MT940; +__PACKAGE__->run_before('check_auth'); sub action_upload_mt940 { my ($self, %params) = @_; @@ -35,5 +36,9 @@ sub action_import_mt940 { }; +sub check_auth { + $::auth->assert('bank_transaction'); +} + 1; -- 2.20.1