[Rt-commit] r7324 - in rt/branches/3.7-EXPERIMENTAL: .

[ruz at bestpractical.com]

Author: ruz
Date: Thu Mar 22 21:38:38 2007
New Revision: 7324

Modified:
   rt/branches/3.7-EXPERIMENTAL/   (props changed)
   rt/branches/3.7-EXPERIMENTAL/lib/RT/Action/SendEmail.pm

Log:
 r4776 at cubic-pc:  cubic | 2007-03-21 17:37:47 +0300
 * minor


Modified: rt/branches/3.7-EXPERIMENTAL/lib/RT/Action/SendEmail.pm
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/lib/RT/Action/SendEmail.pm	(original)
+++ rt/branches/3.7-EXPERIMENTAL/lib/RT/Action/SendEmail.pm	Thu Mar 22 21:38:38 2007
@@ -92,11 +92,6 @@
 
 =cut
 
-# {{{ Scrip methods (_Init, Commit, Prepare, IsApplicable)
-
-
-# {{{ sub Commit
-
 sub Commit {
     my $self = shift;
 
@@ -107,10 +102,6 @@
     return (abs $ret);
 }
 
-# }}}
-
-# {{{ sub Prepare
-
 sub Prepare {
     my $self = shift;
 
@@ -169,12 +160,6 @@
 
 }
 
-# }}}
-
-# }}}
-
-
-
 =head2 To
 
 Returns an array of Mail::Address objects containing all the To: recipients for this notification
@@ -220,8 +205,6 @@
 }
 
 
-# {{{ SendMessage
-
 =head2 SendMessage MIMEObj
 
 sends the message using RT's preferred API.
@@ -271,8 +254,6 @@
     return (1);
 }
 
-# {{{ AddAttachments 
-
 =head2 AddAttachments
 
 Takes any attachments to this transaction and attaches them to the message
@@ -329,10 +310,6 @@
 
 }
 
-# }}}
-
-# {{{ RecordOutgoingMailTransaction
-
 =head2 RecordOutgoingMailTransaction MIMEObj
 
 Record a transaction in RT with this outgoing message for future record-keeping purposes
@@ -390,11 +367,6 @@
 
 }
 
-# }}}
-#
-
-# {{{ sub SetRTSpecialHeaders
-
 =head2 SetRTSpecialHeaders 
 
 This routine adds all the random headers that RT wants in a mail message
@@ -457,8 +429,6 @@
 
 }
 
-# }}}
-
 =head2 SquelchMailTo 
 
 Mark address to be removed from list of the recipients. Returns list of the addresses.
@@ -480,8 +450,6 @@
     }
 }
 
-# {{{ RemoveInappropriateRecipients
-
 =head2 RemoveInappropriateRecipients
 
 Remove addresses that are RT addresses or that are on this transaction's blacklist
@@ -561,9 +529,6 @@
     }
 }
 
-# }}}
-# {{{ sub SetReturnAddress
-
 =head2 SetReturnAddress is_comment => BOOLEAN
 
 Calculate and set From and Reply-To headers based on the is_comment flag.
@@ -620,10 +585,6 @@
 
 }
 
-# }}}
-
-# {{{ sub SetHeader
-
 =head2 SetHeader FIELD, VALUE
 
 Set the FIELD of the current MIME object into VALUE.
@@ -642,11 +603,6 @@
     return $self->TemplateObj->MIMEObj->head->get($field);
 }
 
-# }}}
-
-
-# {{{ sub SetSubject
-
 =head2 SetSubject
 
 This routine sets the subject. it does not add the rt tag. that gets done elsewhere
@@ -683,10 +639,6 @@
 
 }
 
-# }}}
-
-# {{{ sub SetSubjectToken
-
 =head2 SetSubjectToken
 
 This routine fixes the RT tag in the subject. It's unlikely that you want to overwrite this.
@@ -712,8 +664,6 @@
     );
 }
 
-# }}}
-
 =head2 SetReferencesHeaders
 
 Set References and In-Reply-To headers for this message.
@@ -785,8 +735,6 @@
 
 }
 
-# }}}
-
 =head2 PseudoReference
 
 Returns a fake Message-ID: header for the ticket to allow a base level of threading
@@ -801,8 +749,6 @@
 }
 
 
-# {{{ SetHeadingAsEncoding
-
 =head2 SetHeaderAsEncoding($field_name, $charset_encoding)
 
 This routine converts the field into specified charset encoding.
@@ -830,9 +776,6 @@
 
 
 } 
-# }}}
-
-# {{{ MIMEEncodeString
 
 =head2 MIMEEncodeString STRING ENCODING
 
@@ -880,8 +823,6 @@
     }
 }
 
-# }}}
-
 eval "require RT::Action::SendEmail_Vendor";
 die $@ if ($@ && $@ !~ qr{^Can't locate RT/Action/SendEmail_Vendor.pm});
 eval "require RT::Action::SendEmail_Local";