[Rt-commit] r10560 - in rt/branches/3.999-DANGEROUS/html: Admin/CustomFields Admin/Elements Admin/Groups Admin/Queues Admin/Users REST/1.0/Forms/ticket

ruz at bestpractical.com ruz at bestpractical.com
Tue Jan 29 16:59:45 EST 2008


Author: ruz
Date: Tue Jan 29 16:59:45 2008
New Revision: 10560

Modified:
   rt/branches/3.999-DANGEROUS/html/Admin/CustomFields/Modify.html
   rt/branches/3.999-DANGEROUS/html/Admin/CustomFields/Objects.html
   rt/branches/3.999-DANGEROUS/html/Admin/CustomFields/UserRights.html
   rt/branches/3.999-DANGEROUS/html/Admin/CustomFields/index.html
   rt/branches/3.999-DANGEROUS/html/Admin/Elements/CustomFieldTabs
   rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditCustomField
   rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditCustomFieldValues
   rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditCustomFields
   rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditQueueWatchers
   rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditScrip
   rt/branches/3.999-DANGEROUS/html/Admin/Elements/ListGlobalCustomFields
   rt/branches/3.999-DANGEROUS/html/Admin/Elements/ListGlobalScrips
   rt/branches/3.999-DANGEROUS/html/Admin/Elements/PickCustomFields
   rt/branches/3.999-DANGEROUS/html/Admin/Elements/PickObjects
   rt/branches/3.999-DANGEROUS/html/Admin/Elements/QueueRightsForUser
   rt/branches/3.999-DANGEROUS/html/Admin/Elements/SelectCustomFieldLookupType
   rt/branches/3.999-DANGEROUS/html/Admin/Elements/SelectCustomFieldType
   rt/branches/3.999-DANGEROUS/html/Admin/Elements/SelectRights
   rt/branches/3.999-DANGEROUS/html/Admin/Groups/Members.html
   rt/branches/3.999-DANGEROUS/html/Admin/Groups/Modify.html
   rt/branches/3.999-DANGEROUS/html/Admin/Groups/index.html
   rt/branches/3.999-DANGEROUS/html/Admin/Queues/Modify.html
   rt/branches/3.999-DANGEROUS/html/Admin/Queues/People.html
   rt/branches/3.999-DANGEROUS/html/Admin/Queues/Template.html
   rt/branches/3.999-DANGEROUS/html/Admin/Queues/UserRights.html
   rt/branches/3.999-DANGEROUS/html/Admin/Users/GnuPG.html
   rt/branches/3.999-DANGEROUS/html/Admin/Users/Memberships.html
   rt/branches/3.999-DANGEROUS/html/Admin/Users/Modify.html
   rt/branches/3.999-DANGEROUS/html/REST/1.0/Forms/ticket/attachments
   rt/branches/3.999-DANGEROUS/html/REST/1.0/Forms/ticket/default
   rt/branches/3.999-DANGEROUS/html/REST/1.0/Forms/ticket/history
   rt/branches/3.999-DANGEROUS/html/REST/1.0/Forms/transaction/default

Log:
* convert all calls to low case

Modified: rt/branches/3.999-DANGEROUS/html/Admin/CustomFields/Modify.html
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/CustomFields/Modify.html	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/CustomFields/Modify.html	Tue Jan 29 16:59:45 2008
@@ -79,13 +79,13 @@
 <tr><td class="label"><&|/l&>Applies to</&></td>
 <td><& /Admin/Elements/SelectCustomFieldLookupType, 
         name => "LookupType", 
-        Default => $CustomFieldObj->LookupType, &>
+        Default => $CustomFieldObj->lookup_type, &>
 </td></tr>
 
 <tr><td class="label"><&|/l&>Validation</&></td>
 <td><& /Widgets/ComboBox,
     name    => 'Pattern',
-    Default => $CustomFieldObj->Pattern,
+    Default => $CustomFieldObj->pattern,
     Size    => 20,
     Values  => [
         '(?#Mandatory).',
@@ -182,7 +182,7 @@
     }
 
     # Update any existing values
-    my $values = $CustomFieldObj->ValuesObj;
+    my $values = $CustomFieldObj->values_obj;
     while ( my $value = $values->next ) {
         foreach my $attr qw(name Description SortOrder Category) {
             my $param = "$paramtag-". $value->id ."-". $attr;

Modified: rt/branches/3.999-DANGEROUS/html/Admin/CustomFields/Objects.html
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/CustomFields/Objects.html	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/CustomFields/Objects.html	Tue Jan 29 16:59:45 2008
@@ -71,7 +71,7 @@
 $CF->load($id) if ($id);
 
 unless ($CF->id) {  abort(_("Could not load CustomField %1"), $id)};
-my $LookupType = $CF->LookupType || '';
+my $LookupType = $CF->lookup_type || '';
 $LookupType =~ /^(.*?)-/ ||
      abort(_("Object of type %1 cannot take custom fields", $LookupType));
 

Modified: rt/branches/3.999-DANGEROUS/html/Admin/CustomFields/UserRights.html
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/CustomFields/UserRights.html	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/CustomFields/UserRights.html	Tue Jan 29 16:59:45 2008
@@ -60,7 +60,7 @@
 %	while (my $Member = $Users->next()) {
 % my $user_object = $Member->member_obj->object();
 % my $group = RT::Model::Group->new();
-% $group->load_acl_equivalence_group($Member->MemberObj);
+% $group->load_acl_equivalence_group($Member->member_obj);
   <tr align="right"> 
 	<td valign="top"><& /Elements/ShowUser, User => $user_object &></td>
 	  <td>

Modified: rt/branches/3.999-DANGEROUS/html/Admin/CustomFields/index.html
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/CustomFields/index.html	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/CustomFields/index.html	Tue Jan 29 16:59:45 2008
@@ -62,7 +62,7 @@
 <h2><% _("Custom Fields for %1", $lookup) %></h2>
 <ul>
 %        $prev_lookup = $lookup;
-%        push @types, [$lookup, $CustomFieldObj->LookupType];
+%        push @types, [$lookup, $CustomFieldObj->lookup_type];
 %    }
 %    
 <li>

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Elements/CustomFieldTabs
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Elements/CustomFieldTabs	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Elements/CustomFieldTabs	Tue Jan 29 16:59:45 2008
@@ -80,7 +80,7 @@
     };
 
 
-    if ($cf->LookupType =~ /^RT::Model::Queue/io) {
+    if ($cf->lookup_type =~ /^RT::Model::Queue/io) {
 	$tabs->{'this'}->{subtabs}->{D} = {
 	title => _('Applies to'),
 	    path  => "Admin/CustomFields/Objects.html?id=" . $id,

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditCustomField
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditCustomField	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditCustomField	Tue Jan 29 16:59:45 2008
@@ -61,7 +61,7 @@
 <tr><td align="right">
 <&|/l&>Description</&>:
 </td><td>
-<input name="Description" value="<%$CustomFieldObj->Description%>" size="80" />
+<input name="Description" value="<%$CustomFieldObj->description%>" size="80" />
 </td></tr>
 <tr><td align="right">
 <&|/l&>Type</&>:
@@ -115,7 +115,7 @@
 	  abort(_("Could not create CustomField: %1", $msg));
       }
       push @results, $msg;
-      $CustomFieldObj->set_SortOrder($CustomFieldObj->id);
+      $CustomFieldObj->set_sort_order($CustomFieldObj->id);
       $title = _('Created CustomField %1', $CustomFieldObj->name()); 
     } else {
       $CustomFieldObj->load($CustomField) || abort(_('No CustomField'));

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditCustomFieldValues
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditCustomFieldValues	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditCustomFieldValues	Tue Jan 29 16:59:45 2008
@@ -67,7 +67,7 @@
 % my $paramtag = "CustomField-". $CustomField->id ."-Value-". $value->id;
 <tr>
 <td><input type="checkbox" class="checkbox" name="Delete-<% $paramtag %>" /></td>
-<td><input type="text" size="3" name="<% $paramtag %>-SortOrder" value="<% $value->SortOrder %>" /></td>
+<td><input type="text" size="3" name="<% $paramtag %>-SortOrder" value="<% $value->sort_order %>" /></td>
 <td><input type="text" size="30" name="<% $paramtag %>-name" value="<% $value->name %>" /></td>
 <td><input type="text" size="50" name="<% $paramtag %>-Description" value="<% $value->description %>" /></td>
 % if ( $CustomField->type ne 'Combobox' ) {
@@ -80,7 +80,7 @@
 </table>
 <%init>
 
-my $values = $CustomField->ValuesObj();
+my $values = $CustomField->values_obj();
 
 </%init>
 <%args>

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditCustomFields
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditCustomFields	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditCustomFields	Tue Jan 29 16:59:45 2008
@@ -92,14 +92,14 @@
 
 # Check sanity of SortOrders
 my %SortOrders;
-$SortOrders{ $_->SortOrder }++
+$SortOrders{ $_->sort_order }++
   while ($_ = $ObjectCFs->next);
 
 # If there are duplicates, run though and squash them
 if (grep $_ > 1, values %SortOrders) {
     my $i = 1;
     while ( my $ObjectCF = $ObjectCFs->next ) {
-        $ObjectCF->set_SortOrder( $i++ );
+        $ObjectCF->set_sort_order( $i++ );
     }
     $ObjectCFs->goto_first_item;
 }
@@ -110,21 +110,21 @@
     $SourceObj->load_by_cols( object_id => $id, CustomField => $CustomField );
 
     my $TargetObj;
-    my $target_order = $SourceObj->SortOrder + $Move;
+    my $target_order = $SourceObj->sort_order + $Move;
     while (my $ObjectCF = $ObjectCFs->next) { 
-	my $this_order = $ObjectCF->SortOrder;
+	my $this_order = $ObjectCF->sort_order;
 
 	# if we have an exact match, finish the loop now
 	($TargetObj = $ObjectCF, last) if $this_order == $target_order;
 
 	# otherwise, we need to apropos toward the general direction
 	# ... first, check the sign is correct
-	next unless ($this_order - $SourceObj->SortOrder) * $Move > 0;
+	next unless ($this_order - $SourceObj->sort_order) * $Move > 0;
 
 	# ... next, see if we already have a candidate
 	if ($TargetObj) {
 	    # ... if yes, compare the delta and choose the smaller one
-	    my $orig_delta = abs($TargetObj->SortOrder - $target_order);
+	    my $orig_delta = abs($TargetObj->sort_order - $target_order);
 	    my $this_delta = abs($this_order - $target_order);
 	    next if $orig_delta < $this_delta;
 	}
@@ -134,9 +134,9 @@
 
     if ($TargetObj) {
 	# swap their sort order
-	my ($s, $t) = ($SourceObj->SortOrder, $TargetObj->SortOrder);
-	$TargetObj->set_SortOrder($s);
-	$SourceObj->set_SortOrder($t);
+	my ($s, $t) = ($SourceObj->sort_order, $TargetObj->sort_order);
+	$TargetObj->set_sort_order($s);
+	$SourceObj->set_sort_order($t);
 	# because order changed, we must redo search for subsequent uses
     }
 

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditQueueWatchers
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditQueueWatchers	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditQueueWatchers	Tue Jan 29 16:59:45 2008
@@ -53,7 +53,7 @@
 <ul>
 % while (my $watcher=$Members->next) {
 <li>
-<input type="checkbox" class="checkbox" name="Queue-<%$queue_obj->id%>-DeleteWatcher-Type-<%$Watchers->type%>-Principal-<%$watcher->MemberId%>" value="1"
+<input type="checkbox" class="checkbox" name="Queue-<%$queue_obj->id%>-DeleteWatcher-Type-<%$Watchers->type%>-Principal-<%$watcher->member_id%>" value="1"
         unchecked />
 % if ($watcher->member_obj->is_user) { 
 <a href="<%RT->config->get('WebPath')%>/Admin/Users/Modify.html?id=<%$watcher->member_obj->object_id%>">

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditScrip
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditScrip	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Elements/EditScrip	Tue Jan 29 16:59:45 2008
@@ -80,7 +80,7 @@
 <tr><td align="right"><&|/l&>Stage</&>:</td><td>
 <& /Admin/Elements/SelectStage,
     name => "Scrip-$id-Stage",
-    Default => $ARGS{"Scrip-$id-Stage"} || $scrip->Stage,
+    Default => $ARGS{"Scrip-$id-Stage"} || $scrip->stage,
 &></td></tr>
 
 </table>
@@ -99,21 +99,21 @@
 </td></tr>
 
 <tr><td class="labeltop"><&|/l&>Custom condition</&>:</td><td>
-% my $code = $ARGS{"Scrip-$id-CustomIsApplicableCode"} || $scrip->CustomIsApplicableCode || '';
+% my $code = $ARGS{"Scrip-$id-CustomIsApplicableCode"} || $scrip->custom_is_applicable_code || '';
 % my $lines = @{[ $code =~ /\n/gs ]} + 3;
 % $lines = $min_lines if $lines < $min_lines;
 <textarea cols="80" rows="<% $lines %>" name="Scrip-<% $id %>-CustomIsApplicableCode"><% $code %></textarea>
 </td></tr>
 
 <tr><td class="labeltop"><&|/l&>Custom action preparation code</&>:</td><td>
-% $code = $ARGS{"Scrip-$id-CustomPrepareCode"} || $scrip->CustomPrepareCode || '';
+% $code = $ARGS{"Scrip-$id-CustomPrepareCode"} || $scrip->custom_prepare_code || '';
 % $lines = @{[ $code =~ /\n/gs ]} + 3;
 % $lines = $min_lines if $lines < $min_lines;
 <textarea cols="80" rows="<% $lines %>" name="Scrip-<% $id %>-CustomPrepareCode"><% $code %></textarea>
 </td></tr>
 
 <tr><td class="labeltop"><&|/l&>Custom action cleanup code</&>:</td><td>
-% $code = $ARGS{"Scrip-$id-CustomCommitCode"} || $scrip->CustomCommitCode || '';
+% $code = $ARGS{"Scrip-$id-CustomCommitCode"} || $scrip->custom_commit_code || '';
 % $lines = @{[ $code =~ /\n/gs ]} + 3;
 % $lines = $min_lines if $lines < $min_lines;
 <textarea cols="80" rows="<% $lines %>" name="Scrip-<% $id %>-CustomCommitCode"><% $code %></textarea>

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Elements/ListGlobalCustomFields
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Elements/ListGlobalCustomFields	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Elements/ListGlobalCustomFields	Tue Jan 29 16:59:45 2008
@@ -48,7 +48,7 @@
 %   my $count = 0;
 %   while (my $CustomFieldObj = $CustomFields->next) { 
 %   $count++;
-<font size="-1"><%$CustomFieldObj->id%>/<% _($CustomFieldObj->type) %>/<%$CustomFieldObj->name%>: <%$CustomFieldObj->Description%></font>
+<font size="-1"><%$CustomFieldObj->id%>/<% _($CustomFieldObj->type) %>/<%$CustomFieldObj->name%>: <%$CustomFieldObj->description%></font>
 <br />
 %   }
 %   if (!$count) {

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Elements/ListGlobalScrips
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Elements/ListGlobalScrips	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Elements/ListGlobalScrips	Tue Jan 29 16:59:45 2008
@@ -56,7 +56,7 @@
 %   while (my $scrip = $Scrips->next ) {
 <li>
 <a href="<%RT->config->get('WebPath')%>/Admin/Global/Scrip.html?id=<%$scrip->id%>&Queue=<%0%>">
-% if ($scrip->Description) {
+% if ($scrip->description) {
 <%   $scrip->description %> 
 % } else {
 <i>(<&|/l, $scrip->id&>Scrip #%1</&>)</i>

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Elements/PickCustomFields
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Elements/PickCustomFields	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Elements/PickCustomFields	Tue Jan 29 16:59:45 2008
@@ -66,7 +66,7 @@
 <i>(<&|/l&>no name</&>)</i>
 % }
 </a><br />
-    <%$CustomFieldObj->Description%>
+    <%$CustomFieldObj->description%>
   </td>
   <td valign="top">
     <i><% $CustomFieldObj->friendly_type_composite %></i>

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Elements/PickObjects
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Elements/PickObjects	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Elements/PickObjects	Tue Jan 29 16:59:45 2008
@@ -66,7 +66,7 @@
 % } else {
     <i>(<%_("no name")%>)</i><br />
 % }
-    <%$Object->can('Description') ? ($Object->Description||'') : '' %>
+    <%$Object->can('Description') ? ($Object->description||'') : '' %>
     </label>
   </td>
 </tr>

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Elements/QueueRightsForUser
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Elements/QueueRightsForUser	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Elements/QueueRightsForUser	Tue Jan 29 16:59:45 2008
@@ -56,7 +56,7 @@
 <%INIT>
 my $ACL = RT::Model::ACECollection->new();
 $ACL->limit_to_queue($queue_obj->id);
-$ACL->limit_PrincipalToUser($principal_id);
+$ACL->limit_principal_to_user($principal_id);
 </%INIT>
 <%ARGS>
 $principal_id => undef

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Elements/SelectCustomFieldLookupType
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Elements/SelectCustomFieldLookupType	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Elements/SelectCustomFieldLookupType	Tue Jan 29 16:59:45 2008
@@ -46,7 +46,7 @@
 %# 
 %# END BPS TAGGED BLOCK }}}
 <select name ="<%$name%>">
-%for my $option ($cf->LookupTypes) {
+%for my $option ($cf->lookup_types) {
 <option value="<%$option%>" <%defined ($Default) && ($option eq $Default) && "SELECTED"%>><% $cf->friendly_lookup_type($option) %></option>
 %}
 </select>

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Elements/SelectCustomFieldType
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Elements/SelectCustomFieldType	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Elements/SelectCustomFieldType	Tue Jan 29 16:59:45 2008
@@ -46,7 +46,7 @@
 %# 
 %# END BPS TAGGED BLOCK }}}
 <select name ="<%$name%>">
-%for my $option ($cf->TypeComposites) {
+%for my $option ($cf->type_composites) {
 <option value="<%$option%>" <%$option eq $Default && "SELECTED"%>><% $cf->friendly_type_composite($option) %></option>
 %}
 </select>

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Elements/SelectRights
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Elements/SelectRights	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Elements/SelectRights	Tue Jan 29 16:59:45 2008
@@ -100,8 +100,8 @@
     $ACLObj->limit_to_principal( id => $principal_id);
     $ACLObj->order_by(column=>'right_name'); 
 
-    if (ref($Object) && UNIVERSAL::can($Object, 'AvailableRights')) { 
-        %Rights = %{$Object->AvailableRights};
+    if (ref($Object) && UNIVERSAL::can($Object, 'available_rights')) { 
+        %Rights = %{$Object->available_rights};
     } 
 
         else {

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Groups/Members.html
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Groups/Members.html	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Groups/Members.html	Tue Jan 29 16:59:45 2008
@@ -55,7 +55,7 @@
 <&| /Widgets/TitleBox, title => _('Editing membership for group [_1]', $Group->name) &>
 
 <form action="<%RT->config->get('WebPath')%>/Admin/Groups/Members.html" method="post">
-<input type="hidden" class="hidden" name="id" value="<%$Group->Id%>" />
+<input type="hidden" class="hidden" name="id" value="<%$Group->id%>" />
 <table width="100%">
 <tr>
 <td>
@@ -69,7 +69,7 @@
 <tr>
 <td valign="top">
 
-% if ($Group->members_obj->Count == 0 ) {
+% if ($Group->members_obj->count == 0 ) {
 <em><&|/l&>(No members)</&></em>
 % } else {
 <em><&|/l&>(Check box to delete)</&></em>
@@ -81,7 +81,7 @@
 <ul>
 % while ( my $user = $Users->next ) {
 % $UsersSeen{ $user->id } = 1 if $SkipSeenUsers;
-<li><input type="checkbox" class="checkbox" name="delete_member-<% $user->PrincipalObj->Id %>" value="1" />
+<li><input type="checkbox" class="checkbox" name="delete_member-<% $user->principal_obj->id %>" value="1" />
 <& '/Elements/ShowUser', User => $user &></li>
 % }
 </ul>
@@ -90,8 +90,8 @@
 % my $GroupMembers = $Group->members_obj;
 % $GroupMembers->limit_to_groups();
 % while ( my $member = $GroupMembers->next ) {
-% $GroupsSeen{ $member->MemberId } = 1 if $SkipSeenGroups;
-<li><input type="checkbox" class="checkbox" name="delete_member-<% $member->MemberId %>" value="1" />
+% $GroupsSeen{ $member->member_id } = 1 if $SkipSeenGroups;
+<li><input type="checkbox" class="checkbox" name="delete_member-<% $member->member_id %>" value="1" />
 <% $member->member_obj->object->name %>
 % }
 </ul>

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Groups/Modify.html
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Groups/Modify.html	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Groups/Modify.html	Tue Jan 29 16:59:45 2008
@@ -70,7 +70,7 @@
 </tr>
 <tr>
 <td align="right">
-<&|/l&>Description</&>:</td><td colspan="3"><input name="Description" value="<%$Group->Description%>" size="60" /></td>
+<&|/l&>Description</&>:</td><td colspan="3"><input name="Description" value="<%$Group->description%>" size="60" /></td>
 </tr>
 % my $CFs = $Group->custom_fields;
 % while (my $CF = $CFs->next) {

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Groups/index.html
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Groups/index.html	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Groups/index.html	Tue Jan 29 16:59:45 2008
@@ -66,7 +66,7 @@
     PassArguments => [qw(Format Rows Page Order order_by GroupString GroupOp Groupfield FinddisabledGroups)],
 &>
 
-% my $ids = join ',', map $_->id, @{ $Groups->ItemsArrayRef };
+% my $ids = join ',', map $_->id, @{ $Groups->items_array_ref };
 % if ( $ids ) {
 <div align="right"><em>
 (<a href="<% RT->config->get('WebPath') %>/Download/Tabular/Group/<% $ids %>/Groups.tsv">

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Queues/Modify.html
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Queues/Modify.html	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Queues/Modify.html	Tue Jan 29 16:59:45 2008
@@ -82,13 +82,13 @@
 </tr>
 
 <tr><td align="right"><&|/l&>Requests should be due in</&>:</td>
-<td colspan="3"><input name="DefaultDueIn" value="<% ($Create) ? "" : $queue_obj->DefaultDueIn%>" /> <&|/l&>days</&>.</td>
+<td colspan="3"><input name="DefaultDueIn" value="<% ($Create) ? "" : $queue_obj->default_due_in%>" /> <&|/l&>days</&>.</td>
 </tr>
 
 % if ( RT->config->get('GnuPG')->{'Enable'} ) {
-<tr><td align="right"><input type="checkbox" class="checkbox" name="Sign" value="1" <% $queue_obj->Sign? 'checked': '' %> /></td>
+<tr><td align="right"><input type="checkbox" class="checkbox" name="Sign" value="1" <% $queue_obj->sign? 'checked': '' %> /></td>
 <td><&|/l&>sign by default</&></td>
-<td align="right"><input type="checkbox" class="checkbox" name="Encrypt" value="1" <% $queue_obj->Encrypt? 'checked': '' %> /></td>
+<td align="right"><input type="checkbox" class="checkbox" name="Encrypt" value="1" <% $queue_obj->encrypt? 'checked': '' %> /></td>
 <td><&|/l&>encrypt by default</&></td>
 </tr>
 % }

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Queues/People.html
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Queues/People.html	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Queues/People.html	Tue Jan 29 16:59:45 2008
@@ -115,7 +115,7 @@
 % while (my $g = $Groups->next ) {
 <li><&/Elements/SelectWatcherType, Scope=>'queue', name =>
 "Queue-AddWatcher-Principal-".$g->principal_id &> <%$g->name%>
-(<%$g->Description%>)
+(<%$g->description%>)
 % }
 </ul>
 % }

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Queues/Template.html
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Queues/Template.html	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Queues/Template.html	Tue Jan 29 16:59:45 2008
@@ -104,7 +104,7 @@
 }
 my $queue_obj;
 if ($template_obj->id()) {
-  $Queue = $template_obj->Queue;
+  $Queue = $template_obj->queue;
   $queue_obj = $template_obj->queue_obj;
 
   my @attribs = qw( Description Content Queue name);

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Queues/UserRights.html
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Queues/UserRights.html	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Queues/UserRights.html	Tue Jan 29 16:59:45 2008
@@ -61,7 +61,7 @@
 %	while (my $Member = $Users->next()) {
 % my $user_object = $Member->member_obj->object();
 % my $group = RT::Model::Group->new();
-% $group->load_acl_equivalence_group($Member->MemberObj);
+% $group->load_acl_equivalence_group($Member->member_obj);
   <tr align="right"> 
 	<td valign="top"><& /Elements/ShowUser, User => $user_object &></td>
 	  <td>

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Users/GnuPG.html
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Users/GnuPG.html	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Users/GnuPG.html	Tue Jan 29 16:59:45 2008
@@ -40,7 +40,7 @@
 my @results;
 
 my $user_object = RT::Model::User->new( );
-$user_object->Load( $id );
+$user_object->load( $id );
 unless ( $user_object->id ) {
     abort( _("Couldn't load user #%1", $id) );
 }

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Users/Memberships.html
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Users/Memberships.html	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Users/Memberships.html	Tue Jan 29 16:59:45 2008
@@ -105,7 +105,7 @@
             push @results, _( "Couldn't load group #%1", $gid );
             next;
         }
-        my ($status, $msg) = $group->AddMember( $id );
+        my ($status, $msg) = $group->add_member( $id );
         push @results, $msg;
     }
     foreach my $gid( @Delete ) {
@@ -115,17 +115,17 @@
             push @results, _( "Couldn't load group #%1", $gid );
             next;
         }
-        my ($status, $msg) = $group->DeleteMember( $id );
+        my ($status, $msg) = $group->delete_member( $id );
         push @results, $msg;
     }
 }
 
 my $is_member = RT::Model::GroupCollection->new();
-$is_member->limitToUserDefinedGroups;
+$is_member->limit_to_user_defined_groups;
 $is_member->with_member( principal_id => $user_object->id );
 
 my $is_not_member = RT::Model::GroupCollection->new();
-$is_not_member->limitToUserDefinedGroups;
+$is_not_member->limit_to_user_defined_groups;
 $is_not_member->without_member( principal_id => $user_object->id );
 
 $Format ||= q{'<a href="__WebPath__/Admin/Groups/Modify.html?id=__id__">__id__</a>/TITLE:#'}

Modified: rt/branches/3.999-DANGEROUS/html/Admin/Users/Modify.html
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/Admin/Users/Modify.html	(original)
+++ rt/branches/3.999-DANGEROUS/html/Admin/Users/Modify.html	Tue Jan 29 16:59:45 2008
@@ -90,7 +90,7 @@
 <tr><td align="right">
 <&|/l&>unix login</&>: 
 </td><td>
-<input name="Gecos" value="<%$user_object->Gecos%>" />
+<input name="Gecos" value="<%$user_object->gecos%>" />
 </td></tr>
 <tr><td align="right">
 <&|/l&>Language</&>: 
@@ -158,24 +158,24 @@
 <tr><td align="right">
 <&|/l&>City</&>: 
 </td><td>
-<input name="City" value="<%$user_object->City%>" size="14" />
+<input name="City" value="<%$user_object->city%>" size="14" />
 
 </td></tr>
 <tr><td align="right">
 <&|/l&>State</&>: 
 </td><td>
-<input name="State" value="<%$user_object->State%>" size="3" />
+<input name="State" value="<%$user_object->state%>" size="3" />
 
 </td></tr>
 <tr><td align="right">
 <&|/l&>Zip</&>: 
 </td><td>
-<input name="Zip" value="<%$user_object->Zip%>" size="9" />
+<input name="Zip" value="<%$user_object->zip%>" size="9" />
 </td></tr>
 <tr><td align="right">
 <&|/l&>Country</&>: 
 </td><td>
-<input name="Country" value="<%$user_object->Country%>" />
+<input name="Country" value="<%$user_object->country%>" />
 </td></tr>
 </table>
 </&>
@@ -185,22 +185,22 @@
 <tr><td align="right">
 <&|/l&>Residence</&>: 
 </td><td>
-<input name="HomePhone" value="<%$user_object->HomePhone%>" size="13" /><br />
+<input name="HomePhone" value="<%$user_object->home_phone%>" size="13" /><br />
 </td></tr>
 <tr><td align="right">
 <&|/l&>Work</&>: 
 </td><td>
-<input name="WorkPhone" value="<%$user_object->WorkPhone%>" size="13" /><br />
+<input name="WorkPhone" value="<%$user_object->work_phone%>" size="13" /><br />
 </td></tr>
 <tr><td align="right">
 <&|/l&>Mobile</&>: 
 </td><td>
-<input name="MobilePhone" value="<%$user_object->MobilePhone%>" size="13" /><br />
+<input name="MobilePhone" value="<%$user_object->mobile_phone%>" size="13" /><br />
 </td></tr>
 <tr><td align="right">
 <&|/l&>Pager</&>: 
 </td><td>
-<input name="PagerPhone" value="<%$user_object->PagerPhone%>" size="13" /><br />
+<input name="PagerPhone" value="<%$user_object->pager_phone%>" size="13" /><br />
 </td>
 </tr>
 </table>
@@ -232,7 +232,7 @@
 %if (!$Create && $user_object->privileged) {
 <br />
 <&| /Widgets/TitleBox, title => _('Signature') &>
-<textarea class="signature" cols="80" rows="5" name="Signature" wrap="hard"><%$user_object->Signature%></textarea>
+<textarea class="signature" cols="80" rows="5" name="Signature" wrap="hard"><%$user_object->signature%></textarea>
 </&>
 % }
 

Modified: rt/branches/3.999-DANGEROUS/html/REST/1.0/Forms/ticket/attachments
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/REST/1.0/Forms/ticket/attachments	(original)
+++ rt/branches/3.999-DANGEROUS/html/REST/1.0/Forms/ticket/attachments	Tue Jan 29 16:59:45 2008
@@ -92,14 +92,14 @@
 	my @data;
 	push @data, [ id    => $attachment->id   ];
 	push @data, [ subject    => $attachment->subject   ];
-	push @data, [ Creator    => $attachment->Creator   ];
-	push @data, [ Created    => $attachment->Created   ];
+	push @data, [ Creator    => $attachment->creator   ];
+	push @data, [ Created    => $attachment->created   ];
 	push @data, [ Transaction    => $attachment->transaction_id   ];
 	push @data, [ Parent    => $attachment->parent   ];
-	push @data, [ MessageId    => $attachment->MessageId   ];
+	push @data, [ MessageId    => $attachment->message_id   ];
 	push @data, [ Filename    => $attachment->filename   ];
 	push @data, [ content_type    => $attachment->content_type   ];
-	push @data, [ ContentEncoding    => $attachment->ContentEncoding   ];
+	push @data, [ ContentEncoding    => $attachment->content_encoding   ];
 	push @data, [ Headers    => $attachment->headers   ];
 	push @data, [ Content    => $attachment->content   ];
 

Modified: rt/branches/3.999-DANGEROUS/html/REST/1.0/Forms/ticket/default
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/REST/1.0/Forms/ticket/default	(original)
+++ rt/branches/3.999-DANGEROUS/html/REST/1.0/Forms/ticket/default	Tue Jan 29 16:59:45 2008
@@ -94,7 +94,7 @@
         my $starts = RT::Date->new() ;
         $queue->load(1);
         $due->set_to_now;
-        $due->add_days($queue->DefaultDueIn) if $queue->DefaultDueIn;
+        $due->add_days($queue->default_due_in) if $queue->default_due_in;
         $starts->set_to_now;
 
         return [
@@ -265,7 +265,7 @@
 
             my $time = RT::Date->new() ;
             $time->set(Format => 'sql', value => $ticket->$key);
-            next if ($val =~ /^not set$/i || $val eq $time->AsString);
+            next if ($val =~ /^not set$/i || $val eq $time->as_string);
             ($n, $s) = $ticket->$set($val);
         }
         elsif (exists $people{$key}) {

Modified: rt/branches/3.999-DANGEROUS/html/REST/1.0/Forms/ticket/history
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/REST/1.0/Forms/ticket/history	(original)
+++ rt/branches/3.999-DANGEROUS/html/REST/1.0/Forms/ticket/history	Tue Jan 29 16:59:45 2008
@@ -129,7 +129,7 @@
 	if (!%$fields || exists $fields->{lc 'old_value'});
     push @data, [ new_value    => $t->new_value   ]
 	if (!%$fields || exists $fields->{lc 'new_value'});
-    push @data, [ Data    => $t->Data   ]
+    push @data, [ Data    => $t->data   ]
 	if (!%$fields || exists $fields->{lc 'Data'});
     push @data, [ Description    => $t->description   ]
 	if (!%$fields || exists $fields->{lc 'Description'});
@@ -139,10 +139,10 @@
 
     if (!%$fields || exists $fields->{lc 'Content'}) {    
 	my $creator = RT::Model::User->new();
-	$creator->load($t->Creator);
+	$creator->load($t->creator);
 	push @data, [ Creator    => $creator->name   ];
     }
-    push @data, [ Created    => $t->Created   ]
+    push @data, [ Created    => $t->created   ]
 	if (!%$fields || exists $fields->{lc 'Created'});
 
     if (!%$fields || exists $fields->{lc 'Attachments'}) {

Modified: rt/branches/3.999-DANGEROUS/html/REST/1.0/Forms/transaction/default
==============================================================================
--- rt/branches/3.999-DANGEROUS/html/REST/1.0/Forms/transaction/default	(original)
+++ rt/branches/3.999-DANGEROUS/html/REST/1.0/Forms/transaction/default	Tue Jan 29 16:59:45 2008
@@ -81,7 +81,7 @@
       	if (!%$fields || exists $fields->{lc 'old_value'});
       push @data, [ new_value    => $t->new_value   ]
       	if (!%$fields || exists $fields->{lc 'new_value'});
-      push @data, [ Data    => $t->Data   ]
+      push @data, [ Data    => $t->data   ]
   	    if (!%$fields || exists $fields->{lc 'Data'});
       push @data, [ Description    => $t->description   ]
   	    if (!%$fields || exists $fields->{lc 'Description'});
@@ -90,10 +90,10 @@
       
       if (!%$fields || exists $fields->{lc 'Content'}) {    
   	    my $creator = RT::Model::User->new();
-  	    $creator->load($t->Creator);
+  	    $creator->load($t->creator);
   	    push @data, [ Creator    => $creator->name   ];
       }
-      push @data, [ Created    => $t->Created   ]
+      push @data, [ Created    => $t->created   ]
   	    if (!%$fields || exists $fields->{lc 'Created'});
   
       if (!%$fields || exists $fields->{lc 'Attachments'}) {


More information about the Rt-commit mailing list