From 0cefdf762ccc30dd26cd7d47de3809677dfd18a6 Mon Sep 17 00:00:00 2001
From: Guillaume Rousse <guillaume.rousse@renater.fr>
Date: Fri, 3 Nov 2017 16:50:21 +0100
Subject: [PATCH] a single method is enough

---
 bin/account-manager-web.pl          | 7 +------
 lib/IdPAccountManager/WebRequest.pm | 6 ++++++
 2 files changed, 7 insertions(+), 6 deletions(-)

diff --git a/bin/account-manager-web.pl b/bin/account-manager-web.pl
index 1f695c0..3532f5e 100755
--- a/bin/account-manager-web.pl
+++ b/bin/account-manager-web.pl
@@ -20,12 +20,7 @@ chdir $configuration->{root_manager_dir};
 my $request = new IdPAccountManager::WebRequest(
     configuration => $configuration
 );
-
-if (defined $request) {
-    $request->execute();
-}
-
-$request->respond();
+$request->run();
 
 __END__
 
diff --git a/lib/IdPAccountManager/WebRequest.pm b/lib/IdPAccountManager/WebRequest.pm
index 1adef58..470e6ce 100755
--- a/lib/IdPAccountManager/WebRequest.pm
+++ b/lib/IdPAccountManager/WebRequest.pm
@@ -70,6 +70,12 @@ sub new {
     return $self;
 }
 
+sub run {
+    my ($self) = @_;
+    $self->execute();
+    $self->respond();
+}
+
 ## Execute a web request
 sub execute {
     my ($self) = @_;
-- 
GitLab