From 6eb838904b88083c5fa4fe611085eba4a3207acf Mon Sep 17 00:00:00 2001
From: Sergiotarxz <sergiotarxz@posteo.net>
Date: Mon, 11 Nov 2024 12:07:57 +0100
Subject: [PATCH] Redirecting stderr in autobuild.

---
 scripts/main.pl | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/scripts/main.pl b/scripts/main.pl
index 2224c68..213d6b6 100644
--- a/scripts/main.pl
+++ b/scripts/main.pl
@@ -6,10 +6,13 @@ use warnings;
 
 use File::Basename qw/dirname/;
 
-{
+BEGIN {
+    open my $fh, '>&', \*STDERR;
+    open STDERR, '>', '/dev/null';
     system 'perl', 'Build.PL';
     system 'perl', 'Build', 'build';
-}
+    open STDERR, '>&', $fh;
+};
 
 use blib;