[open-ils-commits] r12539 - trunk/Open-ILS/src/perlmods/OpenILS/Application (miker)

[svn at svn.open-ils.org]

Author: miker
Date: 2009-03-16 12:13:11 -0400 (Mon, 16 Mar 2009)
New Revision: 12539

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm
Log:
hide magical ##URI## call numbers from the copy browser in the staff client

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm	2009-03-16 15:27:46 UTC (rev 12538)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm	2009-03-16 16:13:11 UTC (rev 12539)
@@ -374,14 +374,14 @@
 	}
 
 	if( $self->api_name =~ /global/ ) {
-		return _build_volume_list( { record => $docid, deleted => 'f' } );
+		return _build_volume_list( { record => $docid, deleted => 'f', label => { '<>' => '##URI##' } } );
 
 	} else {
 
 		my @all_vols;
 		for my $orgid (@org_ids) {
 			my $vols = _build_volume_list( 
-					{ record => $docid, owning_lib => $orgid, deleted => 'f' } );
+					{ record => $docid, owning_lib => $orgid, deleted => 'f', label => { '<>' => '##URI##' } } );
 			push( @all_vols, @$vols );
 		}