From: miker Date: Fri, 3 Sep 2010 15:41:05 +0000 (+0000) Subject: backporting supercat improvements from r17469 and r17470 X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=365be383c3d69ae350e50e2addaf874a61382de4;p=evergreen%2Fjoelewis.git backporting supercat improvements from r17469 and r17470 git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_2_0@17471 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm b/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm index ee5886987e..92edc8e03b 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm @@ -2677,6 +2677,7 @@ sub as_xml { $xml .= 'id="tag:open-ils.org:asset-call_number/' . $self->obj->id . '" '; $xml .= 'lib="' . $self->escape( $self->obj->owning_lib->shortname ) . '" '; + $xml .= 'opac_visible="' . $self->obj->owning_lib->opac_visible . '" '; $xml .= 'label="' . $self->escape( $self->obj->label ) . '">'; $xml .= "\n"; @@ -3103,13 +3104,13 @@ sub as_xml { $xml .= ">\n"; $xml .= ' ' . $self->escape( $self->obj->status->name ) . "\n"; - $xml .= ' ' . $self->escape( $self->obj->location->name ) . "\n"; - $xml .= ' ' . $self->escape( $self->obj->circ_lib->name ) . "\n"; + $xml .= ' ' . $self->escape( $self->obj->location->name ) . "\n"; + $xml .= ' ' . $self->escape( $self->obj->circ_lib->name ) . "\n"; $xml .= ' obj->circ_lib->id . '" '; $xml .= 'shortname="'.$self->escape( $self->obj->circ_lib->shortname ) .'" '; - $xml .= 'name="'.$self->escape( $self->obj->circ_lib->name ) .'"/>'; + $xml .= 'name="'.$self->escape( $self->obj->circ_lib->name ) .'" opac_visible="'.$self->obj->circ_lib->opac_visible.'"/>'; $xml .= "\n"; $xml .= " \n";