Francois Gouget : testbot/cgi: Rename the OK action to Save.

[Alexandre Julliard]

Module: tools
Branch: master
Commit: ee009fec95153ac32cddeaf1e434468d507cdbe3
URL:    https://source.winehq.org/git/tools.git/?a=commit;h=ee009fec95153ac32cddeaf1e434468d507cdbe3

Author: Francois Gouget <fgouget at codeweavers.com>
Date:   Wed Mar 23 14:58:02 2022 +0100

testbot/cgi: Rename the OK action to Save.

Save better reflects what the action does.

Signed-off-by: Francois Gouget <fgouget at codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard at winehq.org>

---

 testbot/lib/ObjectModel/CGI/ItemPage.pm | 4 ++--
 testbot/web/admin/UserDetails.pl        | 6 +++---
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/testbot/lib/ObjectModel/CGI/ItemPage.pm b/testbot/lib/ObjectModel/CGI/ItemPage.pm
index a178aa6..09dfc04 100644
--- a/testbot/lib/ObjectModel/CGI/ItemPage.pm
+++ b/testbot/lib/ObjectModel/CGI/ItemPage.pm
@@ -116,7 +116,7 @@ sub GetActions($)
   my ($self) = @_;
 
   my @Actions = @{$self->SUPER::GetActions()};
-  push @Actions, "OK", "Cancel";
+  push @Actions, "Save", "Cancel";
 
   return \@Actions;
 }
@@ -151,7 +151,7 @@ sub OnAction($$)
 {
   my ($self, $Action) = @_;
 
-  if ($Action eq "OK")
+  if ($Action eq "Save")
   {
     return !1 if (!$self->Save());
     exit($self->RedirectToList());
diff --git a/testbot/web/admin/UserDetails.pl b/testbot/web/admin/UserDetails.pl
index 8c26930..7f7c710 100644
--- a/testbot/web/admin/UserDetails.pl
+++ b/testbot/web/admin/UserDetails.pl
@@ -89,7 +89,7 @@ sub OnReject($)
   exit($self->RedirectToList());
 }
 
-sub OnOK($)
+sub OnSave($)
 {
   my ($self) = @_;
 
@@ -114,9 +114,9 @@ sub OnAction($$)
   {
     return $self->OnReject();
   }
-  elsif ($Action eq "OK")
+  elsif ($Action eq "Save")
   {
-    return $self->OnOK();
+    return $self->OnSave();
   }
 
   return $self->SUPER::OnAction($Action);