From 59d0e88a4f47d72696473c4e30d282414a6fcc5b Mon Sep 17 00:00:00 2001
From: Gabor Szabo <gabor@szabgab.com>
Date: Sun, 1 Mar 2026 08:29:39 +0100
Subject: [PATCH] test case for duplicate call

---
 t/002_basic.t | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/t/002_basic.t b/t/002_basic.t
index c2b0f06..d1556ab 100644
--- a/t/002_basic.t
+++ b/t/002_basic.t
@@ -26,4 +26,8 @@ subtest baisc => sub {
     $pdf->text("Foobar");
 
     compare_pdf($pdf, '002_basic.pdf');
+    eval {
+        compare_pdf($pdf, '002_basic.pdf');
+    };
+    like $@, qr/Can't use an undefined value as an ARRAY reference/;
 };