X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=lib%2FPublicInbox%2FMsgmap.pm;h=192e311aec2b1d459407e0853cfcecb26c2f0448;hp=6e758c1aa789d19951829ef5e7f4262751c518e7;hb=a46893a2b5dabfdbcf7b593ac19967daecfb1772;hpb=866837def71b9d70198f51e634e6141f75f0df3e

diff --git a/lib/PublicInbox/Msgmap.pm b/lib/PublicInbox/Msgmap.pm
index 6e758c1a..192e311a 100644
--- a/lib/PublicInbox/Msgmap.pm
+++ b/lib/PublicInbox/Msgmap.pm
@@ -36,7 +36,6 @@ sub dbh_new {
 		ReadOnly => !$writable,
 		sqlite_use_immediate_transaction => 1,
 	});
-	$dbh->do('PRAGMA case_sensitive_like = ON');
 	$dbh;
 }
 
@@ -151,23 +150,6 @@ sub minmax {
 	($min, $sth->fetchrow_array);
 }
 
-sub mid_prefixes {
-	my ($self, $pfx, $limit) = @_;
-
-	die "No prefix given" unless (defined $pfx && $pfx ne '');
-	$pfx =~ s/([%_])/\\$1/g;
-	$pfx .= '%';
-
-	$limit ||= 100;
-	$limit += 0; # force to integer
-	$limit ||= 100;
-
-	$self->{dbh}->selectcol_arrayref('SELECT mid FROM msgmap ' .
-					 'WHERE mid LIKE ? ESCAPE ? ' .
-					 "ORDER BY num DESC LIMIT $limit",
-					 undef, $pfx, '\\');
-}
-
 sub mid_delete {
 	my ($self, $mid) = @_;
 	my $dbh = $self->{dbh};