Changeset 9533 for branches/acq-experiment/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm

Timestamp:

05/08/08 12:06:30 (3 months ago)

Author:

erickson

Message:

Merged revisions 9515,9520,9525,9527,9532 via svnmerge from
svn://svn.open-ils.org/ILS/trunk

........

r9515 | dbs | 2008-05-06 15:59:06 -0400 (Tue, 06 May 2008) | 2 lines

After 1.2, domains element is no longer used

........

r9520 | miker | 2008-05-07 14:17:37 -0400 (Wed, 07 May 2008) | 1 line

do not record emtpy tcn valuesOpen-ILS/src/perlmods/OpenILS/Application/Cat.pm

........

r9525 | erickson | 2008-05-07 16:40:13 -0400 (Wed, 07 May 2008) | 1 line

added content handler no longer tries to pull from the cache when the plugin cannot return data for that type of call anyway. removed Amazon stub methods because they 1. should have returned explicit undef, but more importantly because having them around means extra calls to memcache

........

r9527 | erickson | 2008-05-07 16:46:49 -0400 (Wed, 07 May 2008) | 1 line

applying empty tcn check on marc overlay api call as well

........

r9532 | erickson | 2008-05-08 12:01:57 -0400 (Thu, 08 May 2008) | 1 line

dojo-ized CGI parser

........

Location:

branches/acq-experiment

Files:

• . (modified) (1 prop)
• Open-ILS/src/perlmods/OpenILS/Application/Cat.pm (modified) (2 diffs)

branches/acq-experiment/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm

@@ -218 +218 @@
             return $evt if $evt;
 
-                $rec->tcn_value($tcn);
+                $rec->tcn_value($tcn) if ($tcn);
                 $rec->tcn_source($tsource);
 
@@ -293 +293 @@
         $record->source(bib_source_from_name($source)) if $source;
         $record->tcn_source($tcn_source);
-        $record->tcn_value($tcn);
+        $record->tcn_value($tcn) if ($tcn);
         $record->creator($e->requestor->id);
         $record->editor($e->requestor->id);