From f95acaa007f900a52abcd4b390c0af10a86b4fa6 Mon Sep 17 00:00:00 2001
From: Xavier Guimard <xavier.guimard@laposte.net>
Date: Mon, 11 Oct 2010 11:45:37 +0000
Subject: [PATCH] Closes #182 "portal return a 500 error under cgi-script

---
 modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Simple.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Simple.pm b/modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Simple.pm
index 7d46594af..378096509 100644
--- a/modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Simple.pm
+++ b/modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Simple.pm
@@ -738,6 +738,7 @@ sub error_type {
 # Overload CGI::header() to add Lemonldap::NG cookie.
 sub header {
     my $self = shift;
+    unshift @_, '-type' unless ($#_);
     if ( $self->{cookie} ) {
         $self->SUPER::header( @_, -cookie => $self->{cookie} );
     }