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

1 files changed, 1 insertions, 1 deletions

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;