relocatable-maint.texi: escape braces

The change causes makeinfo 5.2 to fail:

env LANG= LC_MESSAGES= LC_ALL= LANGUAGE= makeinfo --no-split
--reference-limit=2000 gnulib.texi
./relocatable-maint.texi:153: misplaced {
...

Escaping the braces as per the attached patch seems to fix this.

diff --git a/ChangeLog b/ChangeLog
index 4a2ccf9..9a9f00b 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2014-01-16  Daniel Albers  <daniel@lbe.rs>  (tiny change)
+
+       relocatable-perl: fix texi syntax
+       * doc/relocatable-maint.texi: Escape braces.
+
 2014-01-09  Reuben Thomas  <rrt@sc3d.org>
 
        relocatable-perl: like relocatable-script, but for Perl scripts

diff --git a/doc/relocatable-maint.texi b/doc/relocatable-maint.texi
index 23b5048..696b350 100644 (file)
--- a/doc/relocatable-maint.texi
+++ b/doc/relocatable-maint.texi
@@ -150,19 +150,19 @@ Perl script that your package installs, add the following:
 
 @example
 @@relocatable_pl@@
-if ("@@RELOCATABLE@@" eq "yes") {
+if ("@@RELOCATABLE@@" eq "yes") @{
   my $exec_prefix = "@@exec_prefix@@";
   my $orig_installdir = "@@bindir@@"; # see Makefile.am's *_SCRIPTS variables
   my ($orig_installprefix, $curr_installprefix) = find_prefixes($orig_installdir, find_curr_installdir());
-  sub relocate { # the subroutine is defined whether or not the enclosing block is executed
+  sub relocate @{ # the subroutine is defined whether or not the enclosing block is executed
     my ($dir) = @@_;
-    if ("@@RELOCATABLE@@" eq "yes") {
+    if ("@@RELOCATABLE@@" eq "yes") @{
       $dir =~ s%^$orig_installprefix/%$curr_installprefix/%;
       $dir =~ s,/$,,;
-    }
+    @}
     return $dir;
-  }
-}
+  @}
+@}
 
 # Get some relocated directory names.
 $sysconfdir = relocate("@@sysconfdir@@");