[Rt-commit] rt branch, 4.0/article-callbacks, created. rt-4.0.2-58-g45d354a

[Kevin Falcone]

The branch, 4.0/article-callbacks has been created
        at  45d354a6d5ee4d3c9f888e366fe0302d13520669 (commit)

- Log -----------------------------------------------------------------
commit 45d354a6d5ee4d3c9f888e366fe0302d13520669
Author: Kevin Falcone <falcone at bestpractical.com>
Date:   Wed Sep 7 15:04:32 2011 -0400

    Make %ARGS modifiable by the callback
    
    If you're going to push new @attribs onto the processing list,
    you may need to also affect %ARGS

diff --git a/share/html/Admin/Articles/Classes/Modify.html b/share/html/Admin/Articles/Classes/Modify.html
index 4bbbeb1..892500e 100644
--- a/share/html/Admin/Articles/Classes/Modify.html
+++ b/share/html/Admin/Articles/Classes/Modify.html
@@ -119,7 +119,7 @@ if ($Create) {
 if ($ClassObj->Id()) {
     $ARGS{HotList} ||= 0 if $Submitted;
     my @attribs= qw(Description Name HotList);
-    $m->callback( CallbackName => 'AttributeList', Attributes => \@attribs );
+    $m->callback( CallbackName => 'AttributeList', Attributes => \@attribs, ARGSRef => \%ARGS );
     push @results, UpdateRecordObject( AttributesRef => \@attribs,
                                        Object => $ClassObj,
                                        ARGSRef => \%ARGS);

-----------------------------------------------------------------------