[open-ils-commits] r19562 - branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application (miker)

[svn at svn.open-ils.org]

Author: miker
Date: 2011-03-02 16:15:15 -0500 (Wed, 02 Mar 2011)
New Revision: 19562

Modified:
   branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm
Log:
Call number sorting "before" the context needs to be segregated based on directly on the label, "here-and-after" on the bytea version.  Testing bears this out, but more eyes would be appreciated.

Modified: branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm
===================================================================
--- branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm	2011-03-02 21:10:24 UTC (rev 19561)
+++ branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm	2011-03-02 21:15:15 UTC (rev 19562)
@@ -299,7 +299,7 @@
 	if ($page <= 0) {
 		my $before = $_storage->request(
 			"open-ils.cstore.direct.asset.call_number.search.atomic",
-			{ label		=> { "<" => { transform => "oils_text_as_bytea", value => ["oils_text_as_bytea", $label] } },
+			{ label		=> { "<" => $label },
 			  owning_lib	=> \@ou_ids,
               deleted => 'f',
               @cp_filter
@@ -422,7 +422,7 @@
 	if ($page < 0) {
 		my $before = $_storage->request(
 			"open-ils.cstore.direct.asset.call_number.search.atomic",
-			{ label		=> { "<" => { transform => "oils_text_as_bytea", value => ["oils_text_as_bytea", $label] } },
+			{ label		=> { "<" => $label },
 			  owning_lib	=> \@ou_ids,
               deleted => 'f',
               @cp_filter