From 79387d4530ffb226794c6c4c5c8c5a7284ae29da Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Sun, 18 Jan 2015 14:41:37 -0800 Subject: [PATCH] fix contact self-service password reset link vs. outlook, RT#32657 --- fs_selfservice/FS-SelfService/cgi/selfservice.cgi | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi index c232c4584..9443a7de7 100755 --- a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi +++ b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi @@ -1,7 +1,7 @@ #!/usr/bin/perl -w use strict; -use vars qw($DEBUG $cgi $session_id $form_max $template_dir); +use vars qw($DEBUG $cgi $session_id $pw_session_id $form_max $template_dir); use subs qw(do_template); use CGI; use CGI::Carp qw(fatalsToBrowser); @@ -97,7 +97,7 @@ my $action = 'myaccount'; # sensible default if ( $cgi->param('action') =~ /^process_forgot_password_session_(\w+)$/ ) { $action = 'process_forgot_password_session'; - $session_id = $1; + $pw_session_id = $1; } elsif ( $cgi->param('action') =~ /^(\w+)$/ ) { if (grep {$_ eq $1} @actions) { $action = $1; @@ -1059,7 +1059,7 @@ sub process_forgot_password { sub process_forgot_password_session { $action = 'process_forgot_password'; check_reset_passwd( - 'session_id' => $session_id, + 'session_id' => $pw_session_id, ); } -- 2.11.0