/[Frey]/trunk/lib/App/RoomReservation/Email.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/lib/App/RoomReservation/Email.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1165 by dpavlin, Thu Jul 2 18:28:17 2009 UTC revision 1166 by dpavlin, Thu Jul 2 18:43:22 2009 UTC
# Line 22  sub send { Line 22  sub send {
22          my $to = qq{"$ime $prezime" <$email>};          my $to = qq{"$ime $prezime" <$email>};
23    
24          $body =~ s{^\s+}{}gm; # strip whitespace at beginning of line          $body =~ s{^\s+}{}gm; # strip whitespace at beginning of line
25            $body =~ s{<br>}{\n}gs;
26          $body =~ s{<[^>]+/?>}{}gs; # strip html          $body =~ s{<[^>]+/?>}{}gs; # strip html
27    
28          my $m = Email::Simple->create(          my $m = Email::Simple->create(
Legend:
Removed from v.1165  
changed lines
  Added in v.1166
  ViewVC Help
Powered by ViewVC 1.1.26