From 61db2de2941fa7527a8e78875c8760c9ec084800 Mon Sep 17 00:00:00 2001 From: Jared Camins-Esakov Date: Mon, 31 Dec 2012 19:52:49 -0500 Subject: [PATCH] Bug 9174 follow-up: Eliminate warning and fix POD Thanks to Marcel for spotting these issues. Signed-off-by: Chris Cormack Signed-off-by: Mason James Signed-off-by: Jared Camins-Esakov --- C4/Koha.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/C4/Koha.pm b/C4/Koha.pm index f7c00111f3..c0040f63bd 100644 --- a/C4/Koha.pm +++ b/C4/Koha.pm @@ -425,7 +425,7 @@ sub getframeworkinfo { =head2 getitemtypeinfo - $itemtype = &getitemtype($itemtype, [$interface]); + $itemtype = &getitemtypeinfo($itemtype, [$interface]); Returns information about an itemtype. The optional $interface argument sets which interface ('opac' or 'intranet') to return the imageurl for. @@ -440,7 +440,7 @@ sub getitemtypeinfo { $sth->execute($itemtype); my $res = $sth->fetchrow_hashref; - $res->{imageurl} = getitemtypeimagelocation( ( $interface eq 'opac' ? 'opac' : 'intranet' ), $res->{imageurl} ); + $res->{imageurl} = getitemtypeimagelocation( ( ( defined $interface && $interface eq 'opac' ) ? 'opac' : 'intranet' ), $res->{imageurl} ); return $res; } -- 2.39.5