From 4e003d2790a5f32ad825cbeca9deafef1eeea48e Mon Sep 17 00:00:00 2001
From: Mike Macgirvin <mike.macgirvin@agentbox.com.au>
Date: Mon, 24 Jun 2024 12:28:29 +1000
Subject: [PATCH] provide registration reason in register approve email

---
 src/Lib/Account.php             | 1 +
 src/Module/Register.php         | 1 +
 view/en/register_verify_eml.tpl | 2 ++
 3 files changed, 4 insertions(+)

diff --git a/src/Lib/Account.php b/src/Lib/Account.php
index 9da3c1b9c..99406d4ee 100644
--- a/src/Lib/Account.php
+++ b/src/Lib/Account.php
@@ -380,6 +380,7 @@ class Account {
                 '$sitename' => get_config('system', 'sitename'),
                 '$siteurl'  =>  z_root(),
                 '$email'    => $arr['email'],
+                '$reason'   => $arr['reason'],
                 '$uid'      => $arr['account']['account_id'],
                 '$hash'     => $hash,
                 '$details'  => $details
diff --git a/src/Module/Register.php b/src/Module/Register.php
index 4e241f303..41ae69097 100644
--- a/src/Module/Register.php
+++ b/src/Module/Register.php
@@ -181,6 +181,7 @@ class Register extends Controller
                 }
             }
         } elseif ($policy == REGISTER_APPROVE) {
+            $result['reason'] = substr(trim(escape_tags($_REQUEST['reason'])),0, 500);
             $res = Account::send_reg_approval_email($result);
             if ($res) {
                 info(t('Your registration is pending approval by the site owner.') . EOL);
diff --git a/view/en/register_verify_eml.tpl b/view/en/register_verify_eml.tpl
index 85d9a12d3..6f21b4c92 100644
--- a/view/en/register_verify_eml.tpl
+++ b/view/en/register_verify_eml.tpl
@@ -2,6 +2,8 @@
 A new user registration request was received at {{$sitename}} which requires 
 your approval. 
 
+Reason:
+{{$reason}}
 
 The login details are as follows: