Changeset b401ef2 for perl


Ignore:
Timestamp:
Nov 19, 2010, 1:48:27 AM (13 years ago)
Author:
Alex Dehnert <adehnert@mit.edu>
Branches:
master, release-1.10, release-1.7, release-1.8, release-1.9
Children:
5fca55f
Parents:
7473e38b
git-author:
Alex Dehnert <adehnert@mit.edu> (05/03/10 14:34:33)
git-committer:
Alex Dehnert <adehnert@mit.edu> (11/19/10 01:48:27)
Message:
Display subject as XMPP personal context (if set)
File:
1 edited

Legend:

Unmodified
Added
Removed
  • perl/modules/Jabber/lib/BarnOwl/Message/Jabber.pm

    r2f25537 rb401ef2  
    6262sub personal_context {
    6363    my $self = shift;
    64     if ($self->is_incoming) {
     64    if($self->subject) {
     65        return "subject: " . $self->subject;
     66    } elsif ($self->is_incoming) {
    6567        return "to " . $self->to;
    6668    } else {
Note: See TracChangeset for help on using the changeset viewer.