<commit_before>package EnsEMBL::Web::Object::Info;

### Stub needed by dynamic home page code

use strict;
use warnings;
no warnings "uninitialized";

use base qw(EnsEMBL::Web::Object);
use EnsEMBL::Web::RegObj;

sub caption {
  my $self   = shift;
  my $species_defs = $ENSEMBL_WEB_REGISTRY->species_defs;
  return 'Search '.$species_defs->ENSEMBL_SITETYPE
    .' '.$species_defs->get_config($self->species, 'SPECIES_COMMON_NAME');
}


sub short_caption { return 'About this species'; }
sub counts        { return undef; }


1;<commit_msg>added availabilty check for example links<commit_after>package EnsEMBL::Web::Object::Info;

### Stub needed by dynamic home page code

use strict;
use warnings;
no warnings "uninitialized";

use base qw(EnsEMBL::Web::Object);
use EnsEMBL::Web::RegObj;

sub caption {
  my $self   = shift;
  my $species_defs = $ENSEMBL_WEB_REGISTRY->species_defs;
  return 'Search '.$species_defs->ENSEMBL_SITETYPE
    .' '.$species_defs->get_config($self->species, 'SPECIES_COMMON_NAME');
}


sub availability {
  my $self = shift;
  my $hash = $self->_availability;
  $hash->{'database.variation'} =
    exists $self->species_defs->databases->{'DATABASE_VARIATION'}  ? 1 : 0;
  return $hash;
}

sub short_caption { return 'About this species'; }
sub counts        { return undef; }


1;
{'fraction_non_alphanumeric': 0.13729977116704806, 'fraction_numerical': 0.0030511060259344014, 'mean_word_length': 4.857142857142857, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 16, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '1346170', 'n_tokens_mistral': 498, 'n_tokens_neox': 461, 'n_words': 109}