[Rt-commit] r14158 - in rt/branches/3.999-DANGEROUS: . lib/RT share/html/Admin/Global share/html/Admin/Groups share/html/Admin/Tools/Shredder share/html/Ticket

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Wed Jul 16 08:57:23 2008
New Revision: 14158

Modified:
   rt/branches/3.999-DANGEROUS/   (props changed)
   rt/branches/3.999-DANGEROUS/lib/RT/SharedSetting.pm
   rt/branches/3.999-DANGEROUS/share/html/Admin/Global/UserRights.html
   rt/branches/3.999-DANGEROUS/share/html/Admin/Groups/Members.html
   rt/branches/3.999-DANGEROUS/share/html/Admin/Tools/Shredder/index.html
   rt/branches/3.999-DANGEROUS/share/html/Ticket/Update.html
   rt/branches/3.999-DANGEROUS/t/web/compilation_errors.t

Log:
 r14546 at sunnavys-mb:  sunnavy | 2008-07-16 19:31:48 +0800
 


Modified: rt/branches/3.999-DANGEROUS/lib/RT/SharedSetting.pm
==============================================================================
--- rt/branches/3.999-DANGEROUS/lib/RT/SharedSetting.pm	(original)
+++ rt/branches/3.999-DANGEROUS/lib/RT/SharedSetting.pm	Wed Jul 16 08:57:23 2008
@@ -148,7 +148,7 @@
     my $self = shift;
     my $id   = shift;
 
-    my $attr = RT::Model::Attribute->new( $self->current_user );
+    my $attr = RT::Model::Attribute->new( current_user => $self->current_user );
     my ( $ok, $msg ) = $attr->load_by_id($id);
 
     if ( !$ok ) {

Modified: rt/branches/3.999-DANGEROUS/share/html/Admin/Global/UserRights.html
==============================================================================
--- rt/branches/3.999-DANGEROUS/share/html/Admin/Global/UserRights.html	(original)
+++ rt/branches/3.999-DANGEROUS/share/html/Admin/Global/UserRights.html	Wed Jul 16 08:57:23 2008
@@ -84,7 +84,7 @@
 # Find out which users we want to display ACL selects for
 my $privileged = RT::Model::Group->new();
 $privileged->load_system_internal_group('privileged');
-my $Users = $privileged->usermembers_obj();
+my $Users = $privileged->user_members_obj();
 $Users->order_by( column => $Userorder_by, order => $Userorder );
 
     

Modified: rt/branches/3.999-DANGEROUS/share/html/Admin/Groups/Members.html
==============================================================================
--- rt/branches/3.999-DANGEROUS/share/html/Admin/Groups/Members.html	(original)
+++ rt/branches/3.999-DANGEROUS/share/html/Admin/Groups/Members.html	Wed Jul 16 08:57:23 2008
@@ -75,7 +75,7 @@
 <br />
 <br />
 <&|/l&>Users</&>
-% my $Users = $Group->usermembers_obj( Recursively => 0 );
+% my $Users = $Group->user_members_obj( Recursively => 0 );
 % $Users->order_by( column => $Userorder_by, order => $Userorder );
 <ul>
 % while ( my $user = $Users->next ) {

Modified: rt/branches/3.999-DANGEROUS/share/html/Admin/Tools/Shredder/index.html
==============================================================================
--- rt/branches/3.999-DANGEROUS/share/html/Admin/Tools/Shredder/index.html	(original)
+++ rt/branches/3.999-DANGEROUS/share/html/Admin/Tools/Shredder/index.html	Wed Jul 16 08:57:23 2008
@@ -149,7 +149,7 @@
 
     $shredder->add_dump_plugin( object => $backup_plugin );
 
-    $shredder->put_objects( objects => \@wipeout_object );
+    $shredder->put_objects( objects => \@WipeoutObject );
     ($status, $msg) = $plugin_obj->set_resolvers( Shredder => $shredder );
     unless( $status ) {
         push @{ $messages{Errors} }, $msg;

Modified: rt/branches/3.999-DANGEROUS/share/html/Ticket/Update.html
==============================================================================
--- rt/branches/3.999-DANGEROUS/share/html/Ticket/Update.html	(original)
+++ rt/branches/3.999-DANGEROUS/share/html/Ticket/Update.html	Wed Jul 16 08:57:23 2008
@@ -86,7 +86,8 @@
 <tr><td class="label"><&|/l&>Update Type</&>:</td>
 <td><select name="UpdateType">
 % if ($Cancomment) {
-<option value="private" <% ($ARGS{'UpdateType'} &&  $ARGS{'UpdateType'} eq "private") ? qq[ selected="selected"] : !$ARGS{'UpdateType'}&&$Commentdefault |n %>><&|/l&>comments (Not sent to requestors)</&></option>
+<option value="private" <% ($ARGS{'UpdateType'} &&  $ARGS{'UpdateType'} eq
+        "private") ? qq[ selected="selected"] : !$ARGS{'UpdateType'}&&$comment_default |n %>><&|/l&>comments (Not sent to requestors)</&></option>
 % }
 % if ($CanRespond) {
 <option value="response" <% ($ARGS{'UpdateType'} && $ARGS{'UpdateType'} eq "response") ? qq[ selected="selected"] : !$ARGS{'UpdateType'}&&$response_default |n %>><&|/l&>Reply to requestors</&></option>
@@ -183,7 +184,7 @@
 # Things needed in the template - we'll do the processing here, just
 # for the convenience:
 
-my ($comment_default, $Response_default);
+my ($comment_default, $response_default);
 if ($action ne 'respond') {
    $comment_default = qq[ selected="selected"];
     $response_default = "";

Modified: rt/branches/3.999-DANGEROUS/t/web/compilation_errors.t
==============================================================================
--- rt/branches/3.999-DANGEROUS/t/web/compilation_errors.t	(original)
+++ rt/branches/3.999-DANGEROUS/t/web/compilation_errors.t	Wed Jul 16 08:57:23 2008
@@ -3,7 +3,7 @@
 use strict;
 use RT::Test;
 use Test::More;
-my $tests = 7;
+my $tests = 2;
 find ( sub { wanted() and $tests += 4 } , 'share/html/');
 plan tests => $tests;
 use HTTP::Request::Common;