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