needed an extra bit of logic to tell checkout.full not to treat a precat as a stop...

git-svn-id: svn://svn.open-ils.org/ILS/trunk@10739 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
index 1f26708..dfa1820 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
@@ -284,7 +284,7 @@ sub translate_legacy_args {
     }
 
     if( $$args{precat} ) {
-        $$args{is_precat} = $$args{precat};
+        $$args{is_precat} = $$args{request_precat} = $$args{precat};
         delete $$args{precat};
     }
 }
@@ -339,6 +339,7 @@ my @AUTOLOAD_FIELDS = qw/
     check_penalty_on_renew
     is_noncat
     is_precat
+    request_precat
     is_checkin
     noncat_type
     editor
@@ -666,7 +667,7 @@ sub do_permit {
         $self->is_renewal and not $self->check_penalty_on_renew;
     return if $self->bail_out;
 
-    if( $self->is_precat ) {
+    if($self->is_precat and not $self->request_precat) {
         $self->push_events(
             OpenILS::Event->new(
                 'ITEM_NOT_CATALOGED', payload => $self->mk_permit_key));