From 28301c5415d8fec4e9785e12d1a06332d30fcb25 Mon Sep 17 00:00:00 2001
From: Augustin Degomme <degomme@idpann.imag.fr>
Date: Fri, 15 Feb 2013 10:39:44 +0100
Subject: [PATCH] be case insensitive when trying to change main name in F90
 files

---
 src/smpi/smpif90.in | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/smpi/smpif90.in b/src/smpi/smpif90.in
index d7cfde1b15..2d76ad20df 100644
--- a/src/smpi/smpif90.in
+++ b/src/smpi/smpif90.in
@@ -25,7 +25,7 @@ while [ -n "$1" ]; do
          SRCFILE="$ARG"
       fi
       #replace "program main_name by subroutine user\_main (and the end clause as well)"
-      sed 's/[[:space:]]*program[[:space:]]*\([a-zA-Z0-9\-\_]*\)/subroutine user\_main /g'  ${ARG} > ${TMPFILE}
+      sed 's/[[:space:]]*program[[:space:]]*\([a-zA-Z0-9\-\_]*\)/subroutine user\_main /gI'  ${ARG} > ${TMPFILE}
       SRCFILE="${TMPFILE}"
       CMDLINE="${CMDLINE} ${SRCFILE} "
       ;;
-- 
2.20.1