From 7751a2c7f9fac3fb07ad31eb86c1d6bf5413580d Mon Sep 17 00:00:00 2001
From: Dan Lowe <dan@tangledhelix.com>
Date: Sun, 5 Jan 2025 22:41:20 -0500
Subject: [PATCH] Improve check for PPGEN commands inside paragraph

Rather than only check for a line beginning with a dot
(inside a <p> tag), check for a more PPGEN-like pattern,
to avoid false-positives such as a paragraph beginning
with an ellipsis.
---
 src/lib/ppvchecks/pphtml.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/lib/ppvchecks/pphtml.pl b/src/lib/ppvchecks/pphtml.pl
index 7f94bfdb..1426e5e1 100644
--- a/src/lib/ppvchecks/pphtml.pl
+++ b/src/lib/ppvchecks/pphtml.pl
@@ -117,8 +117,8 @@ sub runProgram {
             if ( $line =~ /&amp;amp/ ) {
                 printf LOGFILE ( "%d:0 Ampersand: %s\n", $count, $line );
             }
-            if ( $line =~ /<p>\./ ) {
-                printf LOGFILE ( "%d:0 Possible PPG command: %s\n", $count, $line );
+            if ( $line =~ /<p>\.[a-z]{2}/ ) {
+                printf LOGFILE ( "%d:0 Possible PPGEN command: %s\n", $count, $line );
             }
             if ( $line =~ /\`/ ) {
                 printf LOGFILE ( "%d:0 Tick-mark check: %s\n", $count, $line );