[Bps-public-commit] RT-BugTracker-Public branch, rt4, updated. 23943dc01d3d94297a1e816dad34432ff2735e2d

[Kevin Falcone]

The branch, rt4 has been updated
       via  23943dc01d3d94297a1e816dad34432ff2735e2d (commit)
       via  d823820c3b81feca5ca116c23185b09f991b9272 (commit)
      from  a338cb5c730bbcfce704e23449a8d8a89d958e4e (commit)

Summary of changes:
 META.yml                            | 2 +-
 html/Public/Bug/Display.html        | 6 +++---
 html/Public/Bug/Update.html         | 2 +-
 html/Public/Search/Elements/Results | 2 +-
 html/Public/Search/Simple.html      | 2 +-
 lib/RT/BugTracker/Public.pm         | 2 +-
 6 files changed, 8 insertions(+), 8 deletions(-)

- Log -----------------------------------------------------------------
commit d823820c3b81feca5ca116c23185b09f991b9272
Author: Kevin Falcone <falcone at bestpractical.com>
Date:   Fri Dec 21 21:14:00 2012 -0500

    Convert to the new callback method

diff --git a/html/Public/Bug/Display.html b/html/Public/Bug/Display.html
index 0be3b28..a75566b 100755
--- a/html/Public/Bug/Display.html
+++ b/html/Public/Bug/Display.html
@@ -60,7 +60,7 @@
 
 <br />
 
-<& /Elements/Callback, _CallbackName => 'BeforeShowHistory', Ticket => $TicketObj, %ARGS &>
+% $m->callback(%ARGS, CallbackName => 'BeforeShowHistory', Ticket => $TicketObj);
 
 <& /Ticket/Elements/ShowHistory , 
       Ticket => $TicketObj, 
@@ -82,7 +82,7 @@ $TicketObj => undef
 </%ARGS>
 
 <%INIT>
-$m->comp('/Elements/Callback', _CallbackName => 'Initial', TicketObj => $TicketObj, ARGSRef => \%ARGS);
+$m->callback(CallbackName => 'Initial', TicketObj => $TicketObj, ARGSRef => \%ARGS);
 
 my (@Actions, $Tickets);
 
@@ -162,7 +162,7 @@ if (@Actions) {
     $RT::Logger->error("Aborted. Should never be called");
 }
 
-$m->comp('/Elements/Callback', _CallbackName => 'BeforeDisplay',
+$m->callback(CallbackName => 'BeforeDisplay',
 	 TicketObj => \$TicketObj, Tickets => \$Tickets, ARGSRef => \%ARGS);
 
 
diff --git a/html/Public/Bug/Update.html b/html/Public/Bug/Update.html
index 0f39a78..71c056c 100755
--- a/html/Public/Bug/Update.html
+++ b/html/Public/Bug/Update.html
@@ -59,7 +59,7 @@
 <table border="0">
 
 % my $skip;
-<& /Elements/Callback, _CallbackName => 'BeforeUpdateType', skip => \$skip, %ARGS &>
+% $m->callback( %ARGS, CallbackName => 'BeforeUpdateType', skip => \$skip );
 % if (!$skip) {
 <input type="hidden" class="hidden" name="id" value="<%$TicketObj->Id%>" /><br />
 % }
diff --git a/html/Public/Search/Elements/Results b/html/Public/Search/Elements/Results
index dfa788e..b94eee1 100755
--- a/html/Public/Search/Elements/Results
+++ b/html/Public/Search/Elements/Results
@@ -58,7 +58,7 @@
     BaseURL => $BaseURL,
     %ARGS
    &>
-<& /Elements/Callback, _CallbackName => 'SearchActions', QueryString => $QueryString&>
+% $m->callback(CallbackName => 'SearchActions', QueryString => $QueryString);
 <%INIT>
 # Read from user preferences
 my $prefs = $session{'CurrentUser'}->UserObj->Preferences("SearchDisplay") || {};
diff --git a/html/Public/Search/Simple.html b/html/Public/Search/Simple.html
index ce925c0..950f92d 100644
--- a/html/Public/Search/Simple.html
+++ b/html/Public/Search/Simple.html
@@ -79,7 +79,7 @@ my $search;
 if ($q) {
     my $tickets = new RT::Tickets( $session{'CurrentUser'} );
     
-    $m->comp('/Elements/Callback', %ARGS, _CallbackName => 'ModifyQuery', query => \$q);
+    $m->callback( %ARGS, CallbackName => 'ModifyQuery', query => \$q);
     
     # try to load a queue or a user; if found, redirect to the distribution page
     # instead of the search page

commit 23943dc01d3d94297a1e816dad34432ff2735e2d
Author: Kevin Falcone <falcone at bestpractical.com>
Date:   Fri Dec 21 21:14:31 2012 -0500

    Bump version for callback fixes

diff --git a/META.yml b/META.yml
index 2ab9f86..8b986c6 100644
--- a/META.yml
+++ b/META.yml
@@ -23,4 +23,4 @@ requires:
   perl: 5.8.3
 resources:
   license: http://opensource.org/licenses/gpl-license.php
-version: 0.03_01
+version: 0.03_02
diff --git a/lib/RT/BugTracker/Public.pm b/lib/RT/BugTracker/Public.pm
index 03f3df4..4c6b179 100644
--- a/lib/RT/BugTracker/Public.pm
+++ b/lib/RT/BugTracker/Public.pm
@@ -52,7 +52,7 @@ use warnings;
 
 package RT::BugTracker::Public;
 
-our $VERSION = '0.03_01';
+our $VERSION = '0.03_02';
 
 =head1 NAME
 

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