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

svn at svn.open-ils.org svn at svn.open-ils.org
Wed Oct 20 15:49:21 EDT 2010


Author: miker
Date: 2010-10-20 15:49:16 -0400 (Wed, 20 Oct 2010)
New Revision: 18418

Modified:
   branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
Log:
Patch from tsbere to address backporting issue of hard due dates patch against trunk (also, get rid of 3-space indentation..)

Modified: branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
===================================================================
--- branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm	2010-10-20 19:36:34 UTC (rev 18417)
+++ branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm	2010-10-20 19:49:16 UTC (rev 18418)
@@ -1776,18 +1776,20 @@
 sub build_checkout_circ_object {
     my $self = shift;
 
-   my $circ       = Fieldmapper::action::circulation->new;
-   my $duration   = $self->duration_rule;
-   my $max        = $self->max_fine_rule;
-   my $recurring  = $self->recurring_fines_rule;
-   my $hard_due_date    = $self->hard_due_date;
-   my $copy       = $self->copy;
-   my $patron     = $self->patron;
-   my $duration_date_ceiling_force;
+    my $circ       = Fieldmapper::action::circulation->new;
+    my $duration   = $self->duration_rule;
+    my $max        = $self->max_fine_rule;
+    my $recurring  = $self->recurring_fines_rule;
+    my $hard_due_date    = $self->hard_due_date;
+    my $copy       = $self->copy;
+    my $patron     = $self->patron;
+    my $duration_date_ceiling;
+    my $duration_date_ceiling_force;
 
     if( $duration ) {
 
         my $policy = $self->get_circ_policy($duration, $recurring, $max, $hard_due_date);
+        $duration_date_ceiling = $policy->{duration_date_ceiling};
         $duration_date_ceiling_force = $policy->{duration_date_ceiling_force};
 
         my $dname = $duration->name;



More information about the open-ils-commits mailing list