Lines 247-252
sub GetItemTypes {
Link Here
|
247 |
my ( %params ) = @_; |
247 |
my ( %params ) = @_; |
248 |
my $style = defined( $params{'style'} ) ? $params{'style'} : 'hash'; |
248 |
my $style = defined( $params{'style'} ) ? $params{'style'} : 'hash'; |
249 |
|
249 |
|
|
|
250 |
require C4::Languages; |
250 |
my $language = C4::Languages::getlanguage(); |
251 |
my $language = C4::Languages::getlanguage(); |
251 |
# returns a reference to a hash of references to itemtypes... |
252 |
# returns a reference to a hash of references to itemtypes... |
252 |
my %itemtypes; |
253 |
my %itemtypes; |
Lines 549-554
Defaults to intranet.
Link Here
|
549 |
sub getitemtypeinfo { |
550 |
sub getitemtypeinfo { |
550 |
my ($itemtype, $interface) = @_; |
551 |
my ($itemtype, $interface) = @_; |
551 |
my $dbh = C4::Context->dbh; |
552 |
my $dbh = C4::Context->dbh; |
|
|
553 |
require C4::Languages; |
552 |
my $language = C4::Languages::getlanguage(); |
554 |
my $language = C4::Languages::getlanguage(); |
553 |
my $it = $dbh->selectrow_hashref(q| |
555 |
my $it = $dbh->selectrow_hashref(q| |
554 |
SELECT |
556 |
SELECT |
555 |
- |
|
|