[Koha-patches] [[SIGNED OFF]] bug5455 (Fix uninitialized-warnings on authorities.pl)

[Colin Campbell]

From: Marcel de Rooy <M.de.Rooy at rijksmuseum.nl>

Fix warnings for uninitialized authtypecode on lines 646, 653.

Signed-off-by: Colin Campbell <colin.campbell at ptfs-europe.com>
---
 authorities/authorities.pl |    4 +++-
 1 files changed, 3 insertions(+), 1 deletions(-)

diff --git a/authorities/authorities.pl b/authorities/authorities.pl
index 9429a58..d4f1601 100755
--- a/authorities/authorities.pl
+++ b/authorities/authorities.pl
@@ -545,7 +545,9 @@ my $linkid=$input->param('linkid');
 my $authtypecode = $input->param('authtypecode');
 
 my $dbh = C4::Context->dbh;
-$authtypecode = &GetAuthTypeCode($authid) if !$authtypecode;
+if(!$authtypecode) {
+  $authtypecode = $authid? &GetAuthTypeCode($authid): '';
+}
 
 my ($template, $loggedinuser, $cookie)
     = get_template_and_user({template_name => "authorities/authorities.tmpl",
-- 
1.7.3.2