<commit_before>package EnsEMBL::Users::Command::Account::Details::Verify;

### Command to active a user login - user lands on this page after clicking on the link sent to him via email for the purpose of verifying his email
### @author hr5

use strict;
use warnings;

use EnsEMBL::Users::Messages qw(MESSAGE_VERIFICATION_FAILED);

use base qw(EnsEMBL::Users::Command::Account);

sub process {
  my $self    = shift;
  my $object  = $self->object;
  my $login   = $object->fetch_login_from_url_code or return $self->redirect_message(MESSAGE_VERIFICATION_FAILED, {'error' => 1});

  $object->activate_user_login($login);
  return $self->redirect_after_login($login->user);
}

1;<commit_msg>comment<commit_after>package EnsEMBL::Users::Command::Account::Details::Verify;

### Command to active a user login - user lands on this page after clicking on the link sent to him via email for the purpose of verifying his email (when registered via openid)
### @author hr5

use strict;
use warnings;

use EnsEMBL::Users::Messages qw(MESSAGE_VERIFICATION_FAILED);

use base qw(EnsEMBL::Users::Command::Account);

sub process {
  my $self    = shift;
  my $object  = $self->object;
  my $login   = $object->fetch_login_from_url_code or return $self->redirect_message(MESSAGE_VERIFICATION_FAILED, {'error' => 1});

  $object->activate_user_login($login);
  return $self->redirect_after_login($login->user);
}

1;
{'fraction_non_alphanumeric': 0.12437455325232309, 'fraction_numerical': 0.004288777698355968, 'mean_word_length': 5.829268292682927, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 17, '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': '5043003', 'n_tokens_mistral': 448, 'n_tokens_neox': 436, 'n_words': 127}