We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
2 parents 2665153 + 8caf889 commit a5dc636Copy full SHA for a5dc636
lib/MetaCPAN/Script/Watcher.pm
@@ -130,25 +130,6 @@ sub latest_release {
130
->sort( [ { 'date' => { order => "desc" } } ] )->first;
131
}
132
133
-sub skip {
134
- my ( $self, $author, $archive ) = @_;
135
- return $self->es->count( {
136
- index => $self->index->name,
137
- type => 'release',
138
- body => {
139
- query => {
140
- bool => {
141
- must => [
142
- { term => { status => 'backpan' } },
143
- { term => { archive => $archive } },
144
- { term => { author => $author } },
145
- ],
146
- },
147
148
149
- } );
150
-}
151
-
152
sub index_release {
153
my ( $self, $release ) = @_;
154
my $archive = $self->cpan->child( $release->{path} )->stringify;
0 commit comments