give ESXM a fake type if none exists

haarg · haarg · commit 7c53b6644997 · 2025-05-03T15:51:15.000+02:00
diff --git a/lib/MetaCPAN/Model.pm b/lib/MetaCPAN/Model.pm
@@ -28,7 +28,8 @@ for my $index ( sort keys %indexes ) {
 sub doc {
     my ( $self, $doc ) = @_;
     my $doc_config = es_config->documents->{$doc};
-    return $self->index( $doc_config->{index} )->type( $doc_config->{type} );
+    return $self->index( $doc_config->{index} )
+        ->type( $doc_config->{type} // $doc_config->{index} );
 }
 
 __PACKAGE__->meta->make_immutable;

Original file line number	Diff line number	Diff line change
`@@ -28,7 +28,8 @@ for my $index ( sort keys %indexes ) {`
`28`	`28`	`sub doc {`
`29`	`29`	`my ( $self, $doc ) = @_;`
`30`	`30`	`my $doc_config = es_config->documents->{$doc};`
`31`		`- return $self->index( $doc_config->{index} )->type( $doc_config->{type} );`
	`31`	`+ return $self->index( $doc_config->{index} )`
	`32`	`+ ->type( $doc_config->{type} // $doc_config->{index} );`
`32`	`33`	`}`
`33`	`34`
`34`	`35`	`__PACKAGE__->meta->make_immutable;`