From b0b4dd5c717c1da56575e0f5f307847dbf3aa4e4 Mon Sep 17 00:00:00 2001
From: Manager Bot <manager@myjekyllblog.net>
Date: Wed, 30 Nov 2022 14:12:44 +0000
Subject: [PATCH] Now maybe it will work.

---
 Web/lib/MJB/Web/Controller/Auth.pm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/Web/lib/MJB/Web/Controller/Auth.pm b/Web/lib/MJB/Web/Controller/Auth.pm
index 3f2c2db..4e775eb 100644
--- a/Web/lib/MJB/Web/Controller/Auth.pm
+++ b/Web/lib/MJB/Web/Controller/Auth.pm
@@ -251,7 +251,6 @@ sub do_register_stripe ( $c ) {
             my $person = $c->db->resultset('Person')->create({
                 email      => $c->param('email'),
                 name       => $c->param('name'),
-                is_enabled => 0,
             });
             $person->new_related('auth_password', {})->set_password($c->param('password'));
 
@@ -272,7 +271,9 @@ sub do_register_stripe ( $c ) {
 
     # Log the user in asnd then send themn to the payment page.
     $c->session->{uid} = $person->id;
-    $c->redirect_to( $c->url_for( 'show_dashboard' ) );
+    $c->redirect_to( 
+        $c->ua->get( $c->config->{stripe}->{backend} . '/stripe/get-checkout-link?lookup_key=' . $c->config->{stripe}->{lookup_key} )->result->json->{url}
+    );
 }
 
 #==
@@ -280,7 +281,7 @@ sub do_register_stripe ( $c ) {
 #
 # Once a user has registered in the strip work flow, they will need to pay
 # for their account before it is enabled.  This route will bring them to the
-# stripe subscription payment page.
+# stripe subscription payment page -- in case it failed the first time.
 #==
 sub register_stripe_pay ( $c ) {
     # Don't allow this user registration method unless register.enable_open is true.