From 87a1c9abbaa5f843130fe7bfced282685c0a513a Mon Sep 17 00:00:00 2001
From: Michael Andreen <harv@ruin.nu>
Date: Fri, 15 Aug 2008 20:39:59 +0200
Subject: [PATCH] Bugfix, redirect to https version after login

---
 lib/NDWeb/Controller/Root.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lib/NDWeb/Controller/Root.pm b/lib/NDWeb/Controller/Root.pm
index a7a59de..d337a29 100644
--- a/lib/NDWeb/Controller/Root.pm
+++ b/lib/NDWeb/Controller/Root.pm
@@ -60,7 +60,9 @@ sub login : Local {
 		$log->execute($c->user->id,$c->req->address
 			,$country,$c->sessionid,$remember);
 
-		$c->res->redirect($c->req->referer);
+		my $ref = $c->req->referer;
+		$ref =~ s/^http:/https:/;
+		$c->res->redirect($ref);
 		return;
 	}
 }
-- 
2.39.2