From 6ed400461bb2429a5818c58a0a5b92f555700edc Mon Sep 17 00:00:00 2001 From: "Jannis M. Hoffmann" Date: Mon, 9 May 2022 22:57:17 +0200 Subject: some small fixes by perlcritc --- lib/JWebmail/Model/ReadMails/MockJSON.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib/JWebmail/Model/ReadMails/MockJSON.pm') diff --git a/lib/JWebmail/Model/ReadMails/MockJSON.pm b/lib/JWebmail/Model/ReadMails/MockJSON.pm index 345573c..1a16ef6 100644 --- a/lib/JWebmail/Model/ReadMails/MockJSON.pm +++ b/lib/JWebmail/Model/ReadMails/MockJSON.pm @@ -21,7 +21,7 @@ use constant { with 'JWebmail::Model::ReadMails::Role'; -sub new { bless {} } +sub new { bless {}, shift } sub _read_json_file { my ($file_name) = @_; -- cgit v1.2.3