[Rt-commit] rt branch, master, updated. rt-4.1.13-63-g69cd9fa
Ruslan Zakirov
ruz at bestpractical.com
Tue Jul 2 10:22:18 EDT 2013
The branch, master has been updated
via 69cd9fa92ecfa3b89c9e2b7ebba688872b8c8ae4 (commit)
via 97ce2a68b1f9474416208113c3662ad5507fa9e3 (commit)
from 54f54a8fe888e0dfc5915de1ce04bf1f3f9c9f41 (commit)
Summary of changes:
lib/RT/Ticket.pm | 61 --------------------------------------------------------
1 file changed, 61 deletions(-)
- Log -----------------------------------------------------------------
commit 97ce2a68b1f9474416208113c3662ad5507fa9e3
Author: Alex Vandiver <alexmv at bestpractical.com>
Date: Fri Dec 14 18:08:46 2012 -0500
Remove an uncalled internal methods
Originally added in f767805, the only callsites for it were removed in
c9a3dd6 and ec4507b. Remove the uncalled method.
diff --git a/lib/RT/Ticket.pm b/lib/RT/Ticket.pm
index fd2c569..a926e9f 100644
--- a/lib/RT/Ticket.pm
+++ b/lib/RT/Ticket.pm
@@ -582,67 +582,6 @@ sub SetType {
return $self->_Set(Field => 'Type', Value => $value, @_);
}
-
-
-=head2 _Parse822HeadersForAttributes Content
-
-Takes an RFC822 style message and parses its attributes into a hash.
-
-=cut
-
-sub _Parse822HeadersForAttributes {
- my $self = shift;
- my $content = shift;
- my %args;
-
- my @lines = ( split ( /\n/, $content ) );
- while ( defined( my $line = shift @lines ) ) {
- if ( $line =~ /^(.*?):(?:\s+(.*))?$/ ) {
- my $value = $2;
- my $tag = lc($1);
-
- $tag =~ s/-//g;
- if ( defined( $args{$tag} ) )
- { #if we're about to get a second value, make it an array
- $args{$tag} = [ $args{$tag} ];
- }
- if ( ref( $args{$tag} ) )
- { #If it's an array, we want to push the value
- push @{ $args{$tag} }, $value;
- }
- else { #if there's nothing there, just set the value
- $args{$tag} = $value;
- }
- } elsif ($line =~ /^$/) {
-
- #TODO: this won't work, since "" isn't of the form "foo:value"
-
- while ( defined( my $l = shift @lines ) ) {
- push @{ $args{'content'} }, $l;
- }
- }
-
- }
-
- foreach my $date (qw(due starts started resolved)) {
- my $dateobj = RT::Date->new(RT->SystemUser);
- if ( defined ($args{$date}) and $args{$date} =~ /^\d+$/ ) {
- $dateobj->Set( Format => 'unix', Value => $args{$date} );
- }
- else {
- $dateobj->Set( Format => 'unknown', Value => $args{$date} );
- }
- $args{$date} = $dateobj->ISO;
- }
- $args{'mimeobj'} = MIME::Entity->new();
- $args{'mimeobj'}->build(
- Type => ( $args{'contenttype'} || 'text/plain' ),
- Data => ($args{'content'} || '')
- );
-
- return (%args);
-}
-
=head2 OwnerGroup
A constructor which returns an RT::Group object containing the owner of this ticket.
commit 69cd9fa92ecfa3b89c9e2b7ebba688872b8c8ae4
Merge: 54f54a8 97ce2a6
Author: Ruslan Zakirov <ruz at bestpractical.com>
Date: Tue Jul 2 18:21:51 2013 +0400
Merge branch '4.2/remove-uncalled-method'
-----------------------------------------------------------------------
More information about the Rt-commit
mailing list