From d541cd3999074fc7b174e9da709ca7e3dd3fca21 Mon Sep 17 00:00:00 2001
From: Viktor Szakats <commit@vsz.me>
Date: Wed, 9 Jul 2025 22:10:23 +0200
Subject: [PATCH] test1140.pl: enable strict/warnings, fix them

---
 tests/test1140.pl | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/tests/test1140.pl b/tests/test1140.pl
index ac06c4af30..2a4e1e9d9d 100755
--- a/tests/test1140.pl
+++ b/tests/test1140.pl
@@ -26,7 +26,10 @@
 # scan manpages to find basic syntactic problems such as unbalanced \f
 # codes or references to non-existing curl manpages.
 
-my $docsroot = $ARGV[0];
+use strict;
+use warnings 'FATAL' => 'all';
+
+my $docsroot = $ARGV[0] || '.';
 
 if(!$docsroot || ($docsroot eq "-g")) {
     print "Usage: test1140.pl <docs root dir> [manpages]\n";
@@ -40,6 +43,8 @@ my @f = @ARGV;
 
 my %manp;
 
+my $errors = 0;
+
 sub manpresent {
     my ($man) = @_;
     if($manp{$man}) {