From a4b291035cf979b68349a1623cdd7ba54a5f440c Mon Sep 17 00:00:00 2001 From: JT Smith Date: Sat, 12 Apr 2003 03:29:31 +0000 Subject: [PATCH] allowed for "linkonly" attribute --- lib/WebGUI/Macro/LoginToggle.pm | 14 ++++++++++---- 1 file changed, 10 insertions(+), 4 deletions(-) diff --git a/lib/WebGUI/Macro/LoginToggle.pm b/lib/WebGUI/Macro/LoginToggle.pm index 0874ffa71..36b014126 100644 --- a/lib/WebGUI/Macro/LoginToggle.pm +++ b/lib/WebGUI/Macro/LoginToggle.pm @@ -21,11 +21,17 @@ sub process { my (@param, $temp, $login, $logout); @param = WebGUI::Macro::getParams($_[0]); if ($session{user}{userId} == 1) { - $login = $param[0] || WebGUI::International::get(716); - $temp = ''.$login.''; + if ($param[0] eq "linkonly") { + return WebGUI::URL::page('op=displayLogin'); + } + $login = $param[0] || WebGUI::International::get(716); + $temp = ''.$login.''; } else { - $logout = $param[1] || WebGUI::International::get(717); - $temp = ''.$logout.''; + if ($param[0] eq "linkonly") { + return WebGUI::URL::page('op=logout'); + } + $logout = $param[1] || WebGUI::International::get(717); + $temp = ''.$logout.''; } return $temp; }