From d1fe84fad124f65b8548a2746ace0c3fce9cd2c5 Mon Sep 17 00:00:00 2001 From: erickson Date: Thu, 14 Sep 2006 12:42:07 +0000 Subject: [PATCH] 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 --- Open-ILS/src/perlmods/OpenILS/Application/Circ/ScriptBuilder.pm | 1 + 1 file changed, 1 insertion(+) 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; -- 2.43.2