We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 3a95e23 commit fd135e9Copy full SHA for fd135e9
2 files changed
VERSION
@@ -1 +1 @@
1
-1.0.4-svn
+1.0.5-svn
alice.pl
@@ -267,7 +267,7 @@ sub _outgoing_message {
267
# does $from corresponding connection name?
268
foreach my $jid (@{$clients->[$connection_id]->{'jids'}}) {
269
if ($from eq $jid) {
270
- $message->SetFrom('');
+ $message->SetFrom($sender);
271
$message->SetTo($rcpt);
272
$clients->[$connection_id]->{'connection'}->Send($message);
273
$error = 0;
0 commit comments