[Rt-commit] r16133 - in rt/branches/3.999-DANGEROUS: lib/RT/Model

sunnavy at bestpractical.com sunnavy at bestpractical.com
Sun Sep 28 04:31:48 EDT 2008


Author: sunnavy
Date: Sun Sep 28 04:31:48 2008
New Revision: 16133

Modified:
   rt/branches/3.999-DANGEROUS/   (props changed)
   rt/branches/3.999-DANGEROUS/lib/RT/Model/Ticket.pm
   rt/branches/3.999-DANGEROUS/lib/RT/Model/Transaction.pm

Log:
 r16932 at sunnavys-mb:  sunnavy | 2008-09-28 16:09:24 +0800
 name fixes


Modified: rt/branches/3.999-DANGEROUS/lib/RT/Model/Ticket.pm
==============================================================================
--- rt/branches/3.999-DANGEROUS/lib/RT/Model/Ticket.pm	(original)
+++ rt/branches/3.999-DANGEROUS/lib/RT/Model/Ticket.pm	Sun Sep 28 04:31:48 2008
@@ -2548,7 +2548,7 @@
             column           => 'told',
             value            => $datetold->iso,
             time_taken       => $timetaken,
-            transaction_type => 'Told'
+            transaction_type => 'told'
         )
     );
 }

Modified: rt/branches/3.999-DANGEROUS/lib/RT/Model/Transaction.pm
==============================================================================
--- rt/branches/3.999-DANGEROUS/lib/RT/Model/Transaction.pm	(original)
+++ rt/branches/3.999-DANGEROUS/lib/RT/Model/Transaction.pm	Sun Sep 28 04:31:48 2008
@@ -778,15 +778,15 @@
 }
 
 %_brief_descriptions = (
-    CommentEmailRecord => sub {
+    comment_email_record => sub {
         my $self = shift;
         return _("Outgoing email about a comment recorded");
     },
-    EmailRecord => sub {
+    email_record => sub {
         my $self = shift;
         return _("Outgoing email recorded");
     },
-    Correspond => sub {
+    correspond => sub {
         my $self = shift;
         return _("Correspondence added");
     },
@@ -813,15 +813,15 @@
             return _( "%1 %2 changed to %3", $field, $self->old_value, $self->new_value );
         }
     },
-    Untake => sub {
+    untake => sub {
         my $self = shift;
         return _("Untaken");
     },
-    Take => sub {
+    take => sub {
         my $self = shift;
         return _("Taken");
     },
-    Force => sub {
+    force => sub {
         my $self = shift;
         my $Old  = RT::Model::User->new;
         $Old->load( $self->old_value );
@@ -830,19 +830,19 @@
 
         return _( "Owner forcibly changed from %1 to %2", $Old->name, $New->name );
     },
-    Steal => sub {
+    steal => sub {
         my $self = shift;
         my $Old  = RT::Model::User->new;
         $Old->load( $self->old_value );
         return _( "Stolen from %1", $Old->name );
     },
-    Give => sub {
+    give => sub {
         my $self = shift;
         my $New  = RT::Model::User->new;
         $New->load( $self->new_value );
         return _( "Given to %1", $New->name );
     },
-    AddWatcher => sub {
+    add_watcher => sub {
         my $self      = shift;
         my $principal = RT::Model::Principal->new;
         $principal->load( $self->new_value );
@@ -858,7 +858,7 @@
         my $self = shift;
         return _( "subject changed to %1", $self->data );
     },
-    AddLink => sub {
+    add_link => sub {
         my $self = shift;
         my $value;
         if ( $self->new_value ) {
@@ -919,7 +919,7 @@
             return ( $self->data );
         }
     },
-    Set => sub {
+    set => sub {
         my $self = shift;
         if ( $self->field eq 'password' ) {
             return _('password changed');
@@ -932,7 +932,7 @@
         }
 
         # Write the date/time change at local time:
-        elsif ( $self->field =~ /Due|starts|Started|Told/i ) {
+        elsif ( $self->field =~ /due|starts|started|told/i ) {
             my $t1 = RT::Date->new();
             $t1->set( format => 'ISO', value => $self->new_value );
             my $t2 = RT::Date->new();
@@ -950,24 +950,24 @@
             );
         }
     },
-    PurgeTransaction => sub {
+    purge_transaction => sub {
         my $self = shift;
         return _( "Transaction %1 purged", $self->data );
     },
-    AddReminder => sub {
+    add_reminder => sub {
         my $self   = shift;
         my $ticket = RT::Model::Ticket->new;
         $ticket->load( $self->new_value );
         return _( "Reminder '%1' added", $ticket->subject );
     },
-    OpenReminder => sub {
+    open_reminder => sub {
         my $self   = shift;
         my $ticket = RT::Model::Ticket->new;
         $ticket->load( $self->new_value );
         return _( "Reminder '%1' reopened", $ticket->subject );
 
     },
-    ResolveReminder => sub {
+    resolve_reminder => sub {
         my $self   = shift;
         my $ticket = RT::Model::Ticket->new;
         $ticket->load( $self->new_value );


More information about the Rt-commit mailing list