commit c86bbc4c4441a5e899913b59072e1421f9689583
author Akron <nils@diewald-online.de> Wed Mar 29 13:19:06 2017 +0200
committer Akron <nils@diewald-online.de> Thu Apr 27 20:11:25 2017 +0200
tree 95af5b2d1ce1089761a3d34a8dc75c596fe16e33
parent e8235be1ed77e3bd24bb31e816dca08e5ba0392a

Minor indentation fixes

Change-Id: I4ebf92e04b4277473d48e25678eb8d805ffff209

lib/Kalamar/Plugin/KalamarUser.pm

diff --git a/lib/Kalamar/Plugin/KalamarUser.pm b/lib/Kalamar/Plugin/KalamarUser.pm
index 8d12d30..7650e02 100644
--- a/lib/Kalamar/Plugin/KalamarUser.pm
+++ b/lib/Kalamar/Plugin/KalamarUser.pm
@@ -5,6 +5,8 @@
 has 'api';
 has 'ua';
 
+# TODO: Merge with meta-button
+
 sub register {
   my ($plugin, $mojo, $param) = @_;
 
@@ -49,36 +51,36 @@
 
       my $url = Mojo::URL->new($plugin->api)->path('auth/apiToken');
       my $tx = $c->ua->get($url => {
-	Authorization => 'Basic ' . b($user . ':' . $pwd)->b64_encode
+        Authorization => 'Basic ' . b($user . ':' . $pwd)->b64_encode
       });
 
       # Login successful
       if (my $res = $tx->success) {
 
-	my $jwt = $res->json;
+        my $jwt = $res->json;
 
-	my $auth = $jwt->{token_type} . ' ' . $jwt->{token};
+        my $auth = $jwt->{token_type} . ' ' . $jwt->{token};
 
-	$mojo->log->debug(qq!Login successful: "$user" with "$auth"!);
+        $mojo->log->debug(qq!Login successful: "$user" with "$auth"!);
 
-	# Set session info
-	$c->session(user => $user);
-	$c->session(auth => $auth);
+        # Set session info
+        $c->session(user => $user);
+        $c->session(auth => $auth);
 
-	$c->stash(user => $user);
-	$c->stash(auth => $auth);
+        $c->stash(user => $user);
+        $c->stash(auth => $auth);
 
-	# Set cache
-	$c->chi('user')->set($auth => $user);
-	return 1;
+        # Set cache
+        $c->chi('user')->set($auth => $user);
+        return 1;
       }
 
       elsif (my $e = $tx->error) {
-	$c->notify(
-	  error =>
-	    ($e->{code} ? $e->{code} . ': ' : '') .
-	      $e->{message} . ' for Login (remote)'
-	    );
+        $c->notify(
+          error =>
+            ($e->{code} ? $e->{code} . ': ' : '') .
+            $e->{message} . ' for Login (remote)'
+          );
       };
 
       $mojo->log->debug(qq!Login fail: "$user"!);
@@ -110,20 +112,20 @@
 
       unless ($value) {
 
-	my $tx = $plugin->build_authorized_tx($auth, 'GET', 'user/' . $param);
-	$tx = $plugin->ua->start($tx);
+        my $tx = $plugin->build_authorized_tx($auth, 'GET', 'user/' . $param);
+        $tx = $plugin->ua->start($tx);
 
-	unless ($value = $tx->success) {
-	  return;
-	}
-#	else {
-#	  warn $c->dumper($value->json);
-#	};
-	if ($value) {
-	  $value = $value->json;
-	};
+        unless ($value = $tx->success) {
+          return;
+        }
+        #	else {
+        #	  warn $c->dumper($value->json);
+        #	};
+        if ($value) {
+          $value = $value->json;
+        };
 
-	$chi->set($user . '_' . $param => $value);
+        $chi->set($user . '_' . $param => $value);
       };
 
       # Return value
@@ -152,7 +154,7 @@
 
       # Build a JSON transaction object
       my $tx = $plugin->build_authorized_tx(
-	$auth, 'POST', 'user/' . $param, json => $json_obj
+        $auth, 'POST', 'user/' . $param, json => $json_obj
       );
 
       # Start
@@ -186,6 +188,7 @@
   );
 };
 
+
 sub build_authorized_tx {
   my $plugin = shift;
 
@@ -202,7 +205,6 @@
 
   my $url = Mojo::URL->new($plugin->api)->path($path);
 
-
   $header->{Authorization} = $auth;
 
   return $ua->build_tx($method, $url => $header => @values);