From c5e4c1686e5e21c6dbc7df14876747877157a204 Mon Sep 17 00:00:00 2001 From: miker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4> Date: Mon, 4 May 2009 13:47:35 +0000 Subject: [PATCH] adding internal identifier to holdings-namespaced location, status and circlib elements in holdings xml git-svn-id: svn://svn.open-ils.org/ILS/trunk@13047 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm b/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm index 82e00d3e84..f8ecf9ed79 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm @@ -1790,9 +1790,9 @@ sub as_xml { $xml .= 'id="tag:open-ils.org:asset-copy/' . $self->obj->id . '" '; $xml .= 'barcode="' . $self->escape( $self->obj->barcode ) . '">'; - $xml .= '<status>' . $self->escape( $self->obj->status->name ) . '</status>'; - $xml .= '<location>' . $self->escape( $self->obj->location->name ) . '</location>'; - $xml .= '<circlib>' . $self->escape( $self->obj->circ_lib->name ) . '</circlib>'; + $xml .= '<status ident="' . $self->obj->status->id . '">' . $self->escape( $self->obj->status->name ) . '</status>'; + $xml .= '<location ident="' . $self->obj->location->id . '">' . $self->escape( $self->obj->location->name ) . '</location>'; + $xml .= '<circlib ident="' . $self->obj->circ_lib->id . '">' . $self->escape( $self->obj->circ_lib->name ) . '</circlib>'; $xml .= '<circ_lib xmlns="http://open-ils.org/spec/actors/v1" '; $xml .= 'id="tag:open-ils.org:actor-org_unit/' . $self->obj->circ_lib->id . '" '; -- 2.11.0