+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
@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@@");