about summary refs log tree commit homepage
path: root/lib/PublicInbox/Search.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/PublicInbox/Search.pm')
-rw-r--r--lib/PublicInbox/Search.pm30
1 files changed, 0 insertions, 30 deletions
diff --git a/lib/PublicInbox/Search.pm b/lib/PublicInbox/Search.pm
index 760c660b..e79ec0f8 100644
--- a/lib/PublicInbox/Search.pm
+++ b/lib/PublicInbox/Search.pm
@@ -20,7 +20,6 @@ use PublicInbox::Over;
 
 # This is English-only, everything else is non-standard and may be confused as
 # a prefix common in patch emails
-our $REPLY_RE = qr/^re:\s+/i;
 our $LANG = 'english';
 
 use constant {
@@ -182,11 +181,6 @@ sub query {
         }
 }
 
-sub get_thread {
-        my ($self, $mid, $prev) = @_;
-        $self->{over_ro}->get_thread($mid, $prev);
-}
-
 sub retry_reopen {
         my ($self, $cb) = @_;
         for my $i (1..10) {
@@ -298,30 +292,6 @@ sub lookup_article {
         $self->{over_ro}->get_art($num);
 }
 
-sub next_by_mid {
-        my ($self, $mid, $id, $prev) = @_;
-        $self->{over_ro}->next_by_mid($mid, $id, $prev);
-}
-
-# normalize subjects so they are suitable as pathnames for URLs
-# XXX: consider for removal
-sub subject_path {
-        my $subj = pop;
-        $subj = subject_normalized($subj);
-        $subj =~ s![^a-zA-Z0-9_\.~/\-]+!_!g;
-        lc($subj);
-}
-
-sub subject_normalized {
-        my $subj = pop;
-        $subj =~ s/\A\s+//s; # no leading space
-        $subj =~ s/\s+\z//s; # no trailing space
-        $subj =~ s/\s+/ /gs; # no redundant spaces
-        $subj =~ s/\.+\z//; # no trailing '.'
-        $subj =~ s/$REPLY_RE//igo; # remove reply prefix
-        $subj;
-}
-
 sub help {
         my ($self) = @_;
         $self->qp; # parse altids