From 20045d09b7564ec8febeb9ef5d8a608a821f045a Mon Sep 17 00:00:00 2001 From: totoro Date: Fri, 17 Apr 2020 17:22:27 +0900 Subject: [PATCH] Add get_WEB_Action_Name from web arg --- web/CXM_web_arg_utils.anubis | 20 +++++++++++++++++++- 1 file changed, 19 insertions(+), 1 deletion(-) diff --git a/web/CXM_web_arg_utils.anubis b/web/CXM_web_arg_utils.anubis index 7c81ea5..08ab07c 100644 --- a/web/CXM_web_arg_utils.anubis +++ b/web/CXM_web_arg_utils.anubis @@ -8,7 +8,7 @@ transmit tools/basis.anubis transmit xlib/web/CXM_common.anubis transmit xlib/database/db_types.anubis - +transmit xlib/web/types/web_action_name.anubis public define One add_web_arg @@ -600,3 +600,21 @@ public define Word8 }. +public define WEB_Action_Name + get_WEB_Action_Name + ( + List(Web_arg) lwa, + String controller, + String action + )= + if get_String(lwa, action) is + { + failure then no_action + success(action_n) then + if get_String(lwa, controller) is + { + failure then action_name(action_n) + success(controller_n) then controller_action(controller_n, action_n) + } + } +. -- libgit2 0.21.4