texinfo-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

branch master updated: * tp/Texinfo/Convert/Plaintext.pm (_process_text)


From: Gavin D. Smith
Subject: branch master updated: * tp/Texinfo/Convert/Plaintext.pm (_process_text): Inline into the only call site for efficiency, as this is a very frequently called function.
Date: Sat, 25 Nov 2023 16:46:19 -0500

This is an automated email from the git hooks/post-receive script.

gavin pushed a commit to branch master
in repository texinfo.

The following commit(s) were added to refs/heads/master by this push:
     new 265bf1c4d0 * tp/Texinfo/Convert/Plaintext.pm (_process_text): Inline 
into the only call site for efficiency, as this is a very frequently called 
function.
265bf1c4d0 is described below

commit 265bf1c4d007d6c60fda6199e8aa6cda4fa10dc2
Author: Gavin Smith <gavinsmith0123@gmail.com>
AuthorDate: Sat Nov 25 21:46:10 2023 +0000

    * tp/Texinfo/Convert/Plaintext.pm (_process_text):
    Inline into the only call site for efficiency, as this is
    a very frequently called function.
---
 tp/Texinfo/Convert/Plaintext.pm | 20 --------------------
 1 file changed, 20 deletions(-)

diff --git a/tp/Texinfo/Convert/Plaintext.pm b/tp/Texinfo/Convert/Plaintext.pm
index d79ba75068..30900a8505 100644
--- a/tp/Texinfo/Convert/Plaintext.pm
+++ b/tp/Texinfo/Convert/Plaintext.pm
@@ -664,26 +664,6 @@ sub _process_text_internal {
   return $text;
 }
 
-sub _process_text($$$)
-{
-  my ($self, $command, $context) = @_;
-
-  my $text = $command->{'text'};
-
-  if ($context->{'upper_case_stack'}->[-1]->{'upper_case'}) {
-    $text = _protect_sentence_ends($text);
-    $text = uc($text);
-  }
-
-  if (!$self->{'ascii_dashes_and_quotes'} and $self->{'to_utf8'}) {
-    return Texinfo::Convert::Unicode::unicode_text($text,
-                        $context->{'font_type_stack'}->[-1]->{'monospace'});
-  } elsif (!$context->{'font_type_stack'}->[-1]->{'monospace'}) {
-    return _process_text_internal($text);
-  }
-  return $text;
-}
-
 sub new_formatter($$;$)
 {
   my ($self, $type, $conf) = @_;



reply via email to

[Prev in Thread] Current Thread [Next in Thread]