Prevent / in extension in file extension regex.

[blhc/blhc.git] / bin / blhc

diff --git a/bin/blhc b/bin/blhc
index 1a3d55c55f7ef70ee7d929a170e27428f1a602a4..829d78252e90548278ee5ca5d12278f9e6b5a41c 100755 (executable)
--- a/bin/blhc
+++ b/bin/blhc
@@ -138,7 +138,7 @@ my $file_extension_regex = qr/
     \s
     \S+             # Filename without extension.
     \.
-    ([^\\.,;:\s]+)  # File extension.
+    ([^\/\\.,;:\s]+)# File extension.
     (?=\s|\\)       # At end of word. Can't use \b because some files have non
                     # word characters at the end and because \b matches double
                     # extensions (like .cpp.o). Works always as all lines are