X-Git-Url: https://ruderich.org/simon/gitweb/?p=blhc%2Fblhc.git;a=blobdiff_plain;f=bin%2Fblhc;h=2f8da5f2c4efdda473a2e3d414f98e65f3d796c8;hp=8606368f9f34e112582c4fe3a7a4ef02477b794d;hb=06b7783ef223d0f58804f3f08d27c45dc3b97351;hpb=32513c3cf648aab94fb011e488a79bb38c2fafd1

diff --git a/bin/blhc b/bin/blhc
index 8606368..2f8da5f 100755
--- a/bin/blhc
+++ b/bin/blhc
@@ -616,7 +616,7 @@ sub compile_flag_regexp {
     my @result = ();
     foreach my $flag (@flags) {
         # Compile flag regexp for faster execution.
-        my $regex = qr/\s$flag(?:\s|\\)/;
+        my $regex = qr/\s(['"]?)$flag\1(?:\s|\\)/;
 
         # Store flag name in replacement string for correct flags in messages
         # with qr//ed flag regexps.