Lines 213-218
sub buildKohaItemsNamespace {
Link Here
|
213 |
my $homebranch = $branches->{$item->{homebranch}}->{'branchname'}; |
213 |
my $homebranch = $branches->{$item->{homebranch}}->{'branchname'}; |
214 |
my $itemcallnumber = $item->{itemcallnumber} || ''; |
214 |
my $itemcallnumber = $item->{itemcallnumber} || ''; |
215 |
$itemcallnumber =~ s/\&/\&\;/g; |
215 |
$itemcallnumber =~ s/\&/\&\;/g; |
|
|
216 |
$itemcallnumber =~ s/\</\<\;/g; |
217 |
$itemcallnumber =~ s/\>/\>\;/g; |
218 |
$itemcallnumber =~ s/'/\&apos\;/g; |
219 |
$itemcallnumber =~ s/"/\"\;/g; |
216 |
$xml.= "<item><homebranch>$homebranch</homebranch>". |
220 |
$xml.= "<item><homebranch>$homebranch</homebranch>". |
217 |
"<status>$status</status>". |
221 |
"<status>$status</status>". |
218 |
"<itemcallnumber>".$itemcallnumber."</itemcallnumber>" |
222 |
"<itemcallnumber>".$itemcallnumber."</itemcallnumber>" |