Loading lib/Travel/Status/DE/DBRIS/Operators.pm.PL +9 −0 Original line number Diff line number Diff line Loading @@ -41,11 +41,17 @@ $buf .= <<'EOF'; sub get_operator { my ($id) = @_; if (not defined $id) { return; } return $admin_id_to_operator{$id}; } sub get_operator_abbr { my ($id) = @_; if (not defined $id) { return; } if (my $op = $admin_id_to_operator{$id}) { return $op->[0]; } Loading @@ -54,6 +60,9 @@ sub get_operator_abbr { sub get_operator_name { my ($id) = @_; if (not defined $id) { return; } if (my $op = $admin_id_to_operator{$id}) { return $op->[1]; } Loading Loading
lib/Travel/Status/DE/DBRIS/Operators.pm.PL +9 −0 Original line number Diff line number Diff line Loading @@ -41,11 +41,17 @@ $buf .= <<'EOF'; sub get_operator { my ($id) = @_; if (not defined $id) { return; } return $admin_id_to_operator{$id}; } sub get_operator_abbr { my ($id) = @_; if (not defined $id) { return; } if (my $op = $admin_id_to_operator{$id}) { return $op->[0]; } Loading @@ -54,6 +60,9 @@ sub get_operator_abbr { sub get_operator_name { my ($id) = @_; if (not defined $id) { return; } if (my $op = $admin_id_to_operator{$id}) { return $op->[1]; } Loading