[groff] 12/39: [afmtodit]: Migrate Perl shebang for consistency.

[G. Branden Robinson]

gbranden pushed a commit to branch master
in repository groff.

commit 960699167e22f4f91d077fa49d2da105afc3997a
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Mon Oct 24 12:52:08 2022 -0500

    [afmtodit]: Migrate Perl shebang for consistency.
    
    [afmtodit]: Migrate expansion of Perl interpreter in shebang.  Use the
    same technique as mmroff, gropdf, and pdfmom.
    
    * src/utils/afmtodit/afmtodit.am (afmtodit): Replace "@PERL@" instead of
      "/usr/bin/perl".
    
    * src/utils/afmtodit/afmtodit.pl: Use "@PERL@" in shebang.
---
 ChangeLog                      | 9 +++++++++
 src/utils/afmtodit/afmtodit.am | 2 +-
 src/utils/afmtodit/afmtodit.pl | 2 +-
 3 files changed, 11 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 80bbe41b8..3970ef1c9 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,12 @@
+2022-10-24  G. Branden Robinson <g.branden.robinson@gmail.com>
+
+       [afmtodit]: Migrate expansion of Perl interpreter in shebang.
+       Use the same technique as mmroff, gropdf, and pdfmom.
+
+       * src/utils/afmtodit/afmtodit.am (afmtodit): Replace "@PERL@"
+       instead of "/usr/bin/perl".
+       * src/utils/afmtodit/afmtodit.pl: Use "@PERL@" in shebang.
+
 2022-10-24  G. Branden Robinson <g.branden.robinson@gmail.com>
 
        [gropdf] Give program a usage message.
diff --git a/src/utils/afmtodit/afmtodit.am b/src/utils/afmtodit/afmtodit.am
index 2ae545878..fda095d9d 100644
--- a/src/utils/afmtodit/afmtodit.am
+++ b/src/utils/afmtodit/afmtodit.am
@@ -31,7 +31,7 @@ EXTRA_DIST += \
 
 afmtodit: $(afmtodit_srcdir)/afmtodit.pl $(afmtodit_srcdir)/afmtodit.tables
        $(AM_V_GEN)if test -n "$(PERL)"; then \
-         sed -e "s|/usr/bin/perl|$(PERL)|" \
+         sed -e "s|[@]PERL[@]|$(PERL)|" \
              -e "s|[@]VERSION[@]|$(VERSION)|" \
              -e "s|[@]FONTDIR[@]|$(fontdir)|" \
              -e "/[@]afmtodit.tables[@]/ r $(afmtodit_srcdir)/afmtodit.tables" 
\
diff --git a/src/utils/afmtodit/afmtodit.pl b/src/utils/afmtodit/afmtodit.pl
index 8778a27d5..9156ee59f 100644
--- a/src/utils/afmtodit/afmtodit.pl
+++ b/src/utils/afmtodit/afmtodit.pl
@@ -1,4 +1,4 @@
-#! /usr/bin/env perl
+#!@PERL@
 # -*- Perl -*-
 # Copyright (C) 1989-2020 Free Software Foundation, Inc.
 #      Written by James Clark (jjc@jclark.com)