Autocomplete: Make it possible to change -postfix

marcusramberg · Aug 23, 2011 · 7e9bd9b · 7e9bd9b
1 parent 9242174
commit 7e9bd9b
Show file tree

Hide file tree

Showing 2 changed files with 19 additions and 1 deletion.
diff --git a/lib/SolarBeam.pm b/lib/SolarBeam.pm
@@ -37,8 +37,10 @@ sub search {
 sub autocomplete {
   my $callback = pop;
   my ($self, $prefix, %options) = @_;
+  my $postfix = delete $options{'-postfix'} || '\w+';
+
   $options{'regex.flag'} = 'case_insensitive';
-  $options{'regex'} = quotemeta($prefix) . '\w+';
+  $options{'regex'} = quotemeta($prefix) . $postfix;
   my $options = { terms => \%options, -endpoint => 'terms' };
 
   my $url = $self->build_url($options);

diff --git a/t/search.t b/t/search.t
@@ -22,6 +22,22 @@ $mock->expect("/terms",
 
 $sb->autocomplete('ost', fl => 'artifact.name', sub {});
 
+$mock->expect("/terms",
+  wt => 'json',
+  terms => 'true',
+  'terms.fl' => 'artifact.name',
+  'terms.regex' => 'ost.*',
+  'terms.regex.flag' => 'case_insensitive'
+);
+
+$sb->autocomplete('ost',
+  -postfix => '.*',
+  fl => 'artifact.name',
+  sub { }
+);
+
+ok(!$sb->user_agent->{expect});
+
 package UserAgentMock;
 use Test::More;