Skip to content

Commit 1271bc7

Browse files
author
rhc54
committed
Merge pull request open-mpi#1006 from jsquyres/pr/v1.10/fix-deprecated-perl-construct
v1.10: autogen: fix deprecated construct
2 parents a3b4735 + d46cdb9 commit 1271bc7

File tree

1 file changed

+3
-3
lines changed

1 file changed

+3
-3
lines changed

autogen.pl

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,6 @@
11
#!/usr/bin/env perl
22
#
3-
# Copyright (c) 2009-2015 Cisco Systems, Inc. All rights reserved.
3+
# Copyright (c) 2009-2016 Cisco Systems, Inc. All rights reserved.
44
# Copyright (c) 2010 Oracle and/or its affiliates. All rights reserved.
55
# Copyright (c) 2013 Mellanox Technologies, Inc.
66
# All rights reserved.
@@ -991,9 +991,9 @@ sub patch_autotools_output {
991991
# https://github.com/open-mpi/ompi/issues/751
992992
verbose "$indent_str"."Patching configure for libtool.m4 bug\n";
993993
# patch for libtool < 2.4.3
994-
$c =~ s/# Some compilers place space between "-{L,R}" and the path.\n # Remove the space.\n if test \$p = \"-L\" \|\|/# Some compilers place space between "-{L,-l,R}" and the path.\n # Remove the spaces.\n if test \$p = \"-L\" \|\|\n test \$p = \"-l\" \|\|/g;
994+
$c =~ s/# Some compilers place space between "-\{L,R\}" and the path.\n # Remove the space.\n if test \$p = \"-L\" \|\|/# Some compilers place space between "-\{L,-l,R\}" and the path.\n # Remove the spaces.\n if test \$p = \"-L\" \|\|\n test \$p = \"-l\" \|\|/g;
995995
# patch for libtool >= 2.4.3
996-
$c =~ s/# Some compilers place space between "-{L,R}" and the path.\n # Remove the space.\n if test x-L = \"\$p\" \|\|\n test x-R = \"\$p\"\; then/# Some compilers place space between "-{L,-l,R}" and the path.\n # Remove the spaces.\n if test x-L = \"x\$p\" \|\|\n test x-l = \"x\$p\" \|\|\n test x-R = \"x\$p\"\; then/g;
996+
$c =~ s/# Some compilers place space between "-\{L,R\}" and the path.\n # Remove the space.\n if test x-L = \"\$p\" \|\|\n test x-R = \"\$p\"\; then/# Some compilers place space between "-\{L,-l,R\}" and the path.\n # Remove the spaces.\n if test x-L = \"x\$p\" \|\|\n test x-l = \"x\$p\" \|\|\n test x-R = \"x\$p\"\; then/g;
997997

998998
open(OUT, ">configure.patched") || my_die "Can't open configure.patched";
999999
print OUT $c;

0 commit comments

Comments
 (0)