[7898] parsetexi update

[gavinsmith0123]

Revision: 7898
          http://svn.sv.gnu.org/viewvc/?view=rev&root=texinfo&revision=7898
Author:   gavin
Date:     2017-07-02 06:19:27 -0400 (Sun, 02 Jul 2017)
Log Message:
-----------
parsetexi update

Modified Paths:
--------------
    trunk/tp/parsetexi/api.c
    trunk/tp/parsetexi/configure.ac
    trunk/tp/parsetexi/separator.c

Modified: trunk/tp/parsetexi/api.c
===================================================================
--- trunk/tp/parsetexi/api.c    2017-07-02 10:13:28 UTC (rev 7897)
+++ trunk/tp/parsetexi/api.c    2017-07-02 10:19:27 UTC (rev 7898)
@@ -841,6 +841,9 @@
   if (global_info.input_encoding_name)
     hv_store (hv, "input_encoding_name", strlen ("input_encoding_name"),
               newSVpv (global_info.input_encoding_name, 0), 0);
+  if (global_info.input_perl_encoding)
+    hv_store (hv, "input_perl_encoding", strlen ("input_perl_encoding"),
+              newSVpv (global_info.input_perl_encoding, 0), 0);
   if (global_info.novalidate)
     {
       hv_store (hv, "novalidate", strlen ("novalidate"),

Modified: trunk/tp/parsetexi/configure.ac
===================================================================
--- trunk/tp/parsetexi/configure.ac     2017-07-02 10:13:28 UTC (rev 7897)
+++ trunk/tp/parsetexi/configure.ac     2017-07-02 10:19:27 UTC (rev 7898)
@@ -1,6 +1,6 @@
 # configure.ac for Parsetexi
 #
-# Copyright 2016 Free Software Foundation, Inc.
+# Copyright 2016, 2017 Free Software Foundation, Inc.
 #
 # This file is free software; as a special exception the author gives
 # unlimited permission to copy and/or distribute it, with or without
@@ -10,7 +10,7 @@
 # WITHOUT ANY WARRANTY, to the extent permitted by law; without even the
 # implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 #
-AC_INIT([texinfo], [6.0])
+AC_INIT([texinfo], [0])
 AM_INIT_AUTOMAKE
 AC_CONFIG_MACRO_DIR([m4])
 

Modified: trunk/tp/parsetexi/separator.c
===================================================================
--- trunk/tp/parsetexi/separator.c      2017-07-02 10:13:28 UTC (rev 7897)
+++ trunk/tp/parsetexi/separator.c      2017-07-02 10:19:27 UTC (rev 7898)
@@ -427,6 +427,9 @@
           image_no_args:
               line_error ("@image missing filename argument");
             }
+          if (global_info.input_perl_encoding)
+            add_extra_string (image, "input_perl_encoding",
+                              global_info.input_perl_encoding);
         }
       else if (closed_command == CM_dotless)
         {