From f7cc8252325397b5e1b31b35a1ac37da75b26b76 Mon Sep 17 00:00:00 2001
From: eschnett <eschnett@17b73243-c579-4c4c-a9d2-2d5706c11dac>
Date: Mon, 12 Mar 2012 17:42:20 +0000
Subject: Discard spaces after "LANGUAGE xxx" specification in interface.ccl

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

(limited to 'lib')

diff --git a/lib/sbin/interface_parser.pl b/lib/sbin/interface_parser.pl
index d7696358..b5b0266a 100644
--- a/lib/sbin/interface_parser.pl
+++ b/lib/sbin/interface_parser.pl
@@ -746,7 +746,7 @@ sub parse_interface_ccl
       $funcname = $1;
       $provided_by = $2;
 
-      if($provided_by =~ m/(.*)\s*LANGUAGE\s*(.+)/i)
+      if($provided_by =~ m/^(.*)\s+LANGUAGE\s+(.*\S)\s*$/i)
       {
         $provided_by          = $1;
         $provided_by_language = "\U$2";
-- 
cgit v1.2.3