move token type to ID map from Travelynx.pm to Model/Users

lib/Travelynx.pm

@@ -159,17 +159,6 @@ sub startup {
 		}
 	);
 
-	$self->attr(
-		token_type => sub {
-			return {
-				status  => 1,
-				history => 2,
-				travel  => 3,
-				import  => 4,
-			};
-		}
-	);
-
 	$self->attr(
 		account_public_mask => sub {
 			return {

lib/Travelynx/Controller/Api.pm

@@ -571,7 +571,7 @@ sub set_token {
 		return;
 	}
 	my $token    = make_token();
-	my $token_id = $self->app->token_type->{ $self->param('token') };
+	my $token_id = $self->users->get_token_id( $self->param('token') );
 
 	if ( not $token_id ) {
 		$self->redirect_to('account');

lib/Travelynx/Model/Users.pm

@@ -19,6 +19,12 @@ my @sb_templates = (
 	[ 'bahn.expert/regional', 'https://bahn.expert/regional/{name}#{id}' ],
 );
 
+my %token_id = (
+	status  => 1,
+	history => 2,
+	travel  => 3,
+	import  => 4,
+);
 my @token_types = (qw(status history travel import));
 
 sub new {
@@ -27,6 +33,12 @@ sub new {
 	return bless( \%opt, $class );
 }
 
+sub get_token_id {
+	my ( $self, $type ) = @_;
+
+	return $token_id{$type};
+}
+
 sub mark_seen {
 	my ( $self, %opt ) = @_;
 	my $uid = $opt{uid};