Changeset ac4774f
- Timestamp:
- Aug 5, 2017, 11:23:10 PM (8 years ago)
- Children:
- 858d094
- Parents:
- 782fd39
- git-author:
- Jason Gross <jgross@mit.edu> (02/16/13 23:30:26)
- git-committer:
- Jason Gross <jgross@mit.edu> (08/05/17 23:23:10)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
perl/modules/IRC/lib/BarnOwl/Message/IRC.pm
r60b49a7 rac4774f 92 92 } 93 93 94 # logging 95 sub log_filenames { 96 my ($m) = @_; 97 die "IRC should not be handling non-IRC messages" if lc($m->type) ne "irc"; 98 BarnOwl::error("IRC message without a network") if !defined($m->network) || $m->network eq ''; 99 my $filename = lc($m->type) . ":" . lc($m->network); 100 if ($m->is_personal) { 101 if ($m->is_incoming) { 102 $filename .= ":" . $m->sender; 103 } elsif ($m->is_outgoing) { 104 $filename .= ":" . $m->recipient; 105 } 106 } else { 107 $filename .= ":" . $m->channel; 108 } 109 return ($filename); 110 } 111 94 112 1;
Note: See TracChangeset
for help on using the changeset viewer.