From 0144c2363876a220af2148c43ba96ca1a1bd7a0e Mon Sep 17 00:00:00 2001
From: Sadie Powell <sadie@witchery.services>
Date: Sun, 28 Feb 2021 18:46:56 +0000
Subject: Fix running configure on systems with old versions of Perl.

Closes #1852.
---
 make/configure.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'make/configure.pm')

diff --git a/make/configure.pm b/make/configure.pm
index 223f4e58a..656c98097 100644
--- a/make/configure.pm
+++ b/make/configure.pm
@@ -237,7 +237,8 @@ sub module_expand($) {
 
 sub module_shrink($) {
 	my $module = basename shift;
-	return $module =~ s/(?:^m_|\.cpp$)//gr;
+	$module =~ s/(?:^m_|\.cpp$)//g;
+	return $module;
 }
 
 sub write_configure_cache(%) {
-- 
cgit v1.2.3