From 2112332a4ddba1813fe73b81a2ad8d04c3494a0c Mon Sep 17 00:00:00 2001
From: Akron <nils@diewald-online.de>
Date: Thu, 31 Aug 2023 14:27:45 +0200
Subject: [PATCH] Fix stack trace tests for Windows

---
 t/proxy-with-stack-trace.t | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/t/proxy-with-stack-trace.t b/t/proxy-with-stack-trace.t
index 4d49b63..419df3f 100644
--- a/t/proxy-with-stack-trace.t
+++ b/t/proxy-with-stack-trace.t
@@ -244,15 +244,15 @@ foreach my $t (
         [],
         {
             "default log" => [
-                qr{^Help! at t/proxy-with-stack-trace\.t line \d+\.},
+                qr{^Help! at t[\/\\]proxy-with-stack-trace\.t line \d+\.},
                 "Mojo::Exception",
             ],
             "proxy log" => [
-                qr{^Help! at t/proxy-with-stack-trace\.t line \d+\.},
+                qr{^Help! at t[\/\\]proxy-with-stack-trace\.t line \d+\.},
                 "Mojo::Exception",
             ],
             "proxy log show args" => [
-                qr{^Help! at t/proxy-with-stack-trace\.t line \d+\.},
+                qr{^Help! at t[\/\\]proxy-with-stack-trace\.t line \d+\.},
                 "Mojo::Exception",
             ],
         },
@@ -263,15 +263,15 @@ foreach my $t (
         [],
         {
             "default log" => [
-                qr{^Help! at t/proxy-with-stack-trace\.t line \d+\n},
+                qr{^Help! at t[\/\\]proxy-with-stack-trace\.t line \d+\n},
                 "Moose::Exception",
             ],
             "proxy log" => [
-                qr{^Help! at t/proxy-with-stack-trace\.t line \d+\n},
+                qr{^Help! at t[\/\\]proxy-with-stack-trace\.t line \d+\n},
                 "Moose::Exception",
             ],
             "proxy log show args" => [
-                qr{^Help! at t/proxy-with-stack-trace\.t line \d+\n},
+                qr{^Help! at t[\/\\]proxy-with-stack-trace\.t line \d+\n},
                 "Moose::Exception",
             ],
         },
@@ -282,15 +282,15 @@ foreach my $t (
         [],
         {
             "default log" => [
-                qr{^Help!\n\nTrace begun at t/proxy-with-stack-trace\.t line \d+\n},
+                qr{^Help!\n\nTrace begun at t[\/\\]proxy-with-stack-trace\.t line \d+\n},
                 "Throwable::Error",
             ],
             "proxy log" => [
-                qr{^Help!\n\nTrace begun at t/proxy-with-stack-trace\.t line \d+\n},
+                qr{^Help!\n\nTrace begun at t[\/\\]proxy-with-stack-trace\.t line \d+\n},
                 "Throwable::Error",
             ],
             "proxy log show args" => [
-                qr{^Help!\n\nTrace begun at t/proxy-with-stack-trace\.t line \d+\n},
+                qr{^Help!\n\nTrace begun at t[\/\\]proxy-with-stack-trace\.t line \d+\n},
                 "Throwable::Error",
             ],
         },