From f1b30845eb25fc02dd4fa685c186b5a450ba63e8 Mon Sep 17 00:00:00 2001
From: tradke <tradke@17b73243-c579-4c4c-a9d2-2d5706c11dac>
Date: Fri, 10 May 2002 14:30:03 +0000
Subject: Simplify a pattern match (which didn't work on Darwin before).

git-svn-id: http://svn.cactuscode.org/flesh/trunk@2806 17b73243-c579-4c4c-a9d2-2d5706c11dac
---
 lib/sbin/cpp.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/sbin/cpp.pl')

diff --git a/lib/sbin/cpp.pl b/lib/sbin/cpp.pl
index 20fde0af..86416a33 100755
--- a/lib/sbin/cpp.pl
+++ b/lib/sbin/cpp.pl
@@ -1144,7 +1144,7 @@ sub ArgumentSubstitute
 
     for(my $arg = 0; $arg < $nargs; $arg++)
     {
-      if($token =~ m/^$args[$arg]$/)
+      if($token eq "$args[$arg]$")
       {
         $token = $args[$arg+$nargs];
         last;
-- 
cgit v1.2.3