From c9e5b6ba23c6805cee1cdf099aca60011c8c107b Mon Sep 17 00:00:00 2001
From: "Kyle J. McKay" <mackyle@gmail.com>
Date: Tue, 16 Jul 2013 05:17:57 -0700
Subject: [PATCH] User.pm: remove another source of uninitialized variable
 warnings

---
 Girocco/User.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Girocco/User.pm b/Girocco/User.pm
index dde5e41..525affa 100644
--- a/Girocco/User.pm
+++ b/Girocco/User.pm
@@ -310,7 +310,7 @@ sub keys_html_list {
 sub gen_auth {
 	my $self = shift;
 	my ($type) = @_;
-	$type = 'REPO' unless $type =~ /^[A-Z]+$/;
+	$type = 'REPO' unless $type && $type =~ /^[A-Z]+$/;
 
 	$self->{authtype} = $type;
 	$self->{auth} = sha1_hex(time . $$ . rand() . $self->{keys});
-- 
2.11.4.GIT