diff --git a/lib/WebGUI/Macro/L_loginBox.pm b/lib/WebGUI/Macro/L_loginBox.pm
index b2cba96b4..423b596d8 100644
--- a/lib/WebGUI/Macro/L_loginBox.pm
+++ b/lib/WebGUI/Macro/L_loginBox.pm
@@ -45,6 +45,9 @@ sub process {
 			name=>"op",
 			value=>"login"
 			});
+        if ($session{setting}{encryptLogin}) {
+                $var{'form.header'} =~ s/http:/https:/;
+        }
 	$var{'username.label'} = WebGUI::International::get(50);
 	$var{'username.form'} = WebGUI::Form::text({
 		name=>"username",