Constify core_file_command

[deliverable/binutils-gdb.git] / etc / texi2pod.pl

diff --git a/etc/texi2pod.pl b/etc/texi2pod.pl
index dd3e181db34c45bd9c937c8139cb582436e80459..e8192e4d36d806ba2b8f26dfe64ad7adbd5f86f0 100644 (file)
--- a/etc/texi2pod.pl
+++ b/etc/texi2pod.pl
@@ -1,6 +1,6 @@
 #! /usr/bin/perl -w
 
-#   Copyright (C) 1999, 2000, 2001, 2003 Free Software Foundation, Inc.
+#   Copyright (C) 1999-2017 Free Software Foundation, Inc.
 
 # This file is part of GCC.
 
@@ -311,7 +311,7 @@ while(<$inf>) {
        @columns = ();
        for $column (split (/\s*\@tab\s*/, $1)) {
            # @strong{...} is used a @headitem work-alike
-           $column =~ s/^\@strong{(.*)}$/$1/;
+           $column =~ s/^\@strong\{(.*)\}$/$1/;
            push @columns, $column;
        }
        $_ = "\n=item ".join (" : ", @columns)."\n";