[7835] gdt remove translated_paragraph case

[gavinsmith0123]

Revision: 7835
          http://svn.sv.gnu.org/viewvc/?view=rev&root=texinfo&revision=7835
Author:   gavin
Date:     2017-06-18 12:01:28 -0400 (Sun, 18 Jun 2017)
Log Message:
-----------
gdt remove translated_paragraph case

Modified Paths:
--------------
    trunk/ChangeLog
    trunk/tp/Texinfo/Report.pm

Modified: trunk/ChangeLog
===================================================================
--- trunk/ChangeLog     2017-06-18 15:35:53 UTC (rev 7834)
+++ trunk/ChangeLog     2017-06-18 16:01:28 UTC (rev 7835)
@@ -1,5 +1,11 @@
 2017-06-18  Gavin Smith  <address@hidden>
 
+       * tp/Texinfo/Report.pm (gdt): Remove code dealing with a
+       'translated_paragraph' argument.  Condense code dealing
+       with subroutine arguments to a single line.
+
+2017-06-18  Gavin Smith  <address@hidden>
+
        * tp/Texinfo/Convert/Paragraph.pm: Remove check for UTF-8 locale 
        that runs "locale -a".
        xspara_init in tp/Texinfo/Convert/XSParagraph/xspara.c does its 

Modified: trunk/tp/Texinfo/Report.pm
===================================================================
--- trunk/tp/Texinfo/Report.pm  2017-06-18 15:35:53 UTC (rev 7834)
+++ trunk/tp/Texinfo/Report.pm  2017-06-18 16:01:28 UTC (rev 7835)
@@ -244,10 +244,7 @@
 # Return a parsed Texinfo tree
 sub gdt($$;$$)
 {
-  my $self = shift;
-  my $message = shift;
-  my $context = shift;
-  my $type = shift;
+  my ($self, $message, $context, $type) = @_;
 
   my $re = join '|', map { quotemeta $_ } keys %$context
       if (defined($context) and ref($context));
@@ -385,13 +382,7 @@
     print STDERR "GDT $translation_result\n";
   }
 
-  my $tree;
-  # Right now this is not used anywhere.
-  if ($type and $type eq 'translated_paragraph') {
-    $tree = $parser->parse_texi_text($translation_result);
-  } else {
-    $tree = $parser->parse_texi_line($translation_result);
-  }
+  my $tree = $parser->parse_texi_line($translation_result);
   $tree = _substitute ($tree, $context);
   return $tree;
 }
@@ -528,11 +519,6 @@
 that is returned after translation and substitution.  The substitutions
 may only be strings in that case.
 
-=item translated_paragraph
-
-In that case, the parsing of the Texinfo string is done in a 
-context of a paragraph, not in the context of an inline text.
-
 =back
 
 For example in the following call, the string