X-Git-Url: http://git.ieval.ro/?p=zeal.git;a=blobdiff_plain;f=lib%2FZeal.pm;fp=lib%2FZeal.pm;h=c2ed5d7bcf8207aef0dbb6e173e5269fa7e2943a;hp=c943e51fb1381651fa8aeb206ae4f0110bc422b7;hb=795a1ad18a72354f8ad601a31c85481de7b196c0;hpb=164f653cb3a8ecfc674451034b4fd3fd10bfc6e0 diff --git a/lib/Zeal.pm b/lib/Zeal.pm index c943e51..c2ed5d7 100644 --- a/lib/Zeal.pm +++ b/lib/Zeal.pm @@ -46,7 +46,7 @@ sub sets { sub query { my ($self, $query, $family) = @_; - ($family, $query) = split /:/, $query, 2 if !$family && $query =~ /:/; + ($family, $query) = split /:/, $query, 2 if !$family && $query =~ /^\w+:[^:]/; my @res = map { $_->query($query) } $self->sets($family); wantarray ? @res : $res[0] }