Bug 24016: (QA follow-up) Format code to adhere to perltidy format

Signed-off-by: Joonas Kylmälä <joonas.kylmala@helsinki.fi>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>

diff --git a/Koha/Patron/Message.pm b/Koha/Patron/Message.pm
index 8383780..10ef58c 100644 (file)
--- a/Koha/Patron/Message.pm
+++ b/Koha/Patron/Message.pm
@@ -49,9 +49,9 @@ sub store {
               and $self->message_type
               and $self->branchcode;
 
-    unless (defined $self->manager_id) {
+    unless ( defined $self->manager_id ) {
         my $userenv = C4::Context->userenv;
-        $self->manager_id( $userenv ? $userenv->{number} : undef);
+        $self->manager_id( $userenv ? $userenv->{number} : undef );
     }
 
     C4::Log::logaction( "MEMBERS", "ADDCIRCMESSAGE", $self->borrowernumber, $self->message )