From: erickson Date: Thu, 14 Sep 2006 12:42:07 +0000 (+0000) Subject: shoving editor into ctx so others can use it or roll it back X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=d1fe84fad124f65b8548a2746ace0c3fce9cd2c5;p=evergreen%2Fpines.git shoving editor into ctx so others can use it or roll it back git-svn-id: svn://svn.open-ils.org/ILS/trunk@6093 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/ScriptBuilder.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/ScriptBuilder.pm index 01d53fd4ef..b46234a09a 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/ScriptBuilder.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/ScriptBuilder.pm @@ -46,6 +46,7 @@ sub build { my $editor = $$args{editor} || new_editor(xact => 1); $args->{_direct} = {} unless $args->{_direct}; + $args->{editor} = $editor; $evt = fetch_bib_data($editor, $args); push(@evts, $evt) if $evt;