Plugin::Usres: rename change_email() to request_change_email()

diff --git a/src/newslash_web/lib/Newslash/Plugin/Users.pm b/src/newslash_web/lib/Newslash/Plugin/Users.pm
index 5a0f54d..3203dac 100644 (file)
--- a/src/newslash_web/lib/Newslash/Plugin/Users.pm
+++ b/src/newslash_web/lib/Newslash/Plugin/Users.pm
@@ -14,9 +14,10 @@ sub register {
     # default config values
     my $cnf = $app->config->{Users} ||= {};
     $cnf->{newpasswd_expiration} ||= 60 * 60 * 24; # 60[sec] * 60[min] * 24[hour]
+    $cnf->{update_email_expiration} ||= 60 * 60 * 24; # 60[sec] * 60[min] * 24[hour]
 }
 
-sub change_email {
+sub request_change_email {
     my ($self, $user, $email) = @_;
 
     if (!$user || !$user->{uid}) {

diff --git a/src/newslash_web/lib/Newslash/Web/Controller/API/User.pm b/src/newslash_web/lib/Newslash/Web/Controller/API/User.pm
index 51c18fb..2d46831 100644 (file)
--- a/src/newslash_web/lib/Newslash/Web/Controller/API/User.pm
+++ b/src/newslash_web/lib/Newslash/Web/Controller/API/User.pm
@@ -287,7 +287,7 @@ sub update_email {
         $message = "invalid_address";
     }
     else {
-        my $rs = $c->users->change_email($user, $address);
+        my $rs = $c->users->request_change_email($user, $address);
         if (!$rs) {
             $message = $c->users->last_error;
         }