From 77e175e63b23b2d09c9cd19d202500f6642cfe53 Mon Sep 17 00:00:00 2001
From: Ed J <mohawk2@users.noreply.github.com>
Date: Mon, 28 Oct 2024 03:11:48 +0000
Subject: [PATCH] handle glx/zink warning -
 https://github.com/PDLPorters/PDL-Graphics-Simple/issues/10

---
 CHANGES                     | 1 +
 lib/PDL/Graphics/Gnuplot.pm | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/CHANGES b/CHANGES
index 93da1b4..4ce4543 100644
--- a/CHANGES
+++ b/CHANGES
@@ -1,4 +1,5 @@
 - add default SIG{TERM,INT,QUIT,HUP} handler to close more gracefully
+- handle glx etc warnings from Gnuplot (https://github.com/PDLPorters/PDL-Graphics-Simple/issues/10) - thanks @eserte for report
 
 2.030 2024-09-29
 - require PDL version that has raster2fits; previously didn't require one with t_raster2fits which test used
diff --git a/lib/PDL/Graphics/Gnuplot.pm b/lib/PDL/Graphics/Gnuplot.pm
index e5c5210..c689d82 100644
--- a/lib/PDL/Graphics/Gnuplot.pm
+++ b/lib/PDL/Graphics/Gnuplot.pm
@@ -7471,7 +7471,7 @@ sub _printGnuplotPipe
 # are explicitly stripped out
 our $cp_serial = 0;
 
-my $graphics_re = qr/^(?:qt\.|XType:|MESA:|QSocketNotifier:).*/m;
+my $graphics_re = qr/^(?:qt\.|XType:|MESA:|QSocketNotifier:|glx:|failed to load).*/m;
 sub _checkpoint {
     my $this   = shift;
     my $suffix = shift || "main";