changeset 20722:b76162d57ead

munge-texi.pl: Silence warning from new versions of Perl (bug #46475). * munge-texi.pl: Escape any brace characters in single-quoted regexp to avoid a warning in newewer versions of Perl.
author Rik <rik@octave.org>
date Thu, 19 Nov 2015 08:46:31 -0800
parents 7c21b151b8b4
children 7581021c5ca3
files doc/interpreter/munge-texi.pl
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/doc/interpreter/munge-texi.pl	Wed Nov 18 22:31:29 2015 -0800
+++ b/doc/interpreter/munge-texi.pl	Thu Nov 19 08:46:31 2015 -0800
@@ -97,12 +97,12 @@
   while (defined ($_ = <DOCFH>) and ! /$doc_delim/o)
   {
     # expand any @seealso references
-    if (m'^@seealso{')
+    if (m'^@seealso\{')
     {
       # Join multiple lines until full macro body found
       while (! /}/m) { $_ .= <DOCFH>; }
 
-      ($arg_list, $rest_of_line) = m'^@seealso{(.*)}(.*)?'s;
+      ($arg_list, $rest_of_line) = m'^@seealso\{(.*)\}(.*)?'s;
 
       $func_list = $arg_list;
       $func_list =~ s/\s+//gs;