[open-ils-commits] r13678 - trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ (erickson)

[svn at svn.open-ils.org]

Author: erickson
Date: 2009-07-21 17:06:50 -0400 (Tue, 21 Jul 2009)
New Revision: 13678

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
Log:
setting circ.workstation when appropriate.  some minor tab leveling

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm	2009-07-21 20:56:53 UTC (rev 13677)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm	2009-07-21 21:06:50 UTC (rev 13678)
@@ -1467,6 +1467,8 @@
    $circ->target_copy( $copy->id );
    $circ->usr( $patron->id );
    $circ->circ_lib( $self->circ_lib );
+   $circ->workstation($self->editor->requestor->wsid) 
+    if defined $self->editor->requestor->wsid;
 
    if( $self->is_renewal ) {
       $circ->opac_renewal('t') if $self->opac_renewal;
@@ -1477,14 +1479,14 @@
    }
 
 
-   # if the user provided an overiding checkout time,
-   # (e.g. the checkout really happened several hours ago), then
-   # we apply that here.  Does this need a perm??
+    # if the user provided an overiding checkout time,
+    # (e.g. the checkout really happened several hours ago), then
+    # we apply that here.  Does this need a perm??
     $circ->xact_start(clense_ISO8601($self->checkout_time))
         if $self->checkout_time;
 
-   # if a patron is renewing, 'requestor' will be the patron
-   $circ->circ_staff($self->editor->requestor->id);
+    # if a patron is renewing, 'requestor' will be the patron
+    $circ->circ_staff($self->editor->requestor->id);
     $circ->due_date( $self->create_due_date($circ->duration) ) if $circ->duration;
 
     $self->circ($circ);