refactor: explicit function imports
This commit is contained in:
@@ -1,7 +1,7 @@
|
|||||||
package Urupam::API;
|
package Urupam::API;
|
||||||
|
|
||||||
use Mojo::Base 'Mojolicious::Controller';
|
use Mojo::Base 'Mojolicious::Controller';
|
||||||
use Urupam::Utils;
|
use Urupam::Utils qw(sanitize_input get_error_status sanitize_error_message);
|
||||||
|
|
||||||
sub shorten {
|
sub shorten {
|
||||||
my $c = shift;
|
my $c = shift;
|
||||||
@@ -18,7 +18,7 @@ sub shorten {
|
|||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
my $original_url = Urupam::Utils::sanitize_input( $json->{url} || '' );
|
my $original_url = sanitize_input( $json->{url} || '' );
|
||||||
|
|
||||||
unless ($original_url) {
|
unless ($original_url) {
|
||||||
$c->render(
|
$c->render(
|
||||||
@@ -50,8 +50,8 @@ sub shorten {
|
|||||||
sub {
|
sub {
|
||||||
my $err = shift;
|
my $err = shift;
|
||||||
$c->app->log->error("API URL validation/creation error: $err");
|
$c->app->log->error("API URL validation/creation error: $err");
|
||||||
my $status = Urupam::Utils::get_error_status($err);
|
my $status = get_error_status($err);
|
||||||
my $sanitized_error = Urupam::Utils::sanitize_error_message($err);
|
my $sanitized_error = sanitize_error_message($err);
|
||||||
$c->render(
|
$c->render(
|
||||||
json => { error => $sanitized_error },
|
json => { error => $sanitized_error },
|
||||||
status => $status
|
status => $status
|
||||||
@@ -100,8 +100,8 @@ sub get_url {
|
|||||||
sub {
|
sub {
|
||||||
my $err = shift;
|
my $err = shift;
|
||||||
$c->app->log->error("API URL retrieval error: $err");
|
$c->app->log->error("API URL retrieval error: $err");
|
||||||
my $status = Urupam::Utils::get_error_status($err);
|
my $status = get_error_status($err);
|
||||||
my $sanitized_error = Urupam::Utils::sanitize_error_message($err);
|
my $sanitized_error = sanitize_error_message($err);
|
||||||
$c->render(
|
$c->render(
|
||||||
json => { error => $sanitized_error },
|
json => { error => $sanitized_error },
|
||||||
status => $status
|
status => $status
|
||||||
|
|||||||
Reference in New Issue
Block a user