use format_message to provide a full featured log message

1 files changed, 6 insertions, 3 deletions

diff --git a/lib/Dancer/Logger/PSGI.pm b/lib/Dancer/Logger/PSGI.pm
index 9134e2b..d4803f2 100644
--- a/lib/Dancer/Logger/PSGI.pm
+++ b/lib/Dancer/Logger/PSGI.pm
@@ -15,9 +15,12 @@ sub init {}
 sub _log {
     my ( $self, $level, $message ) = @_;
     my $request = Dancer::SharedData->request;
-    if ( $request->{env}->{'psgix.logger'} ) {
-        $request->{env}->{'psgix.logger'}
-            ->( { level => $level, message => $message } );
+    if ($request->{env}->{'psgix.logger'}) {
+        $request->{env}->{'psgix.logger'}->(
+            {   level   => $level,
+                message => $self->format_message($level => $message)
+            }
+        );
     }
 }