fix typo in /ex in chat mode

diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm
index 30ad8c560fd2b81a9ff1dad5dcc98fd8c0c68784..e75b4f0424fe990732e8b4fbc8ff340a60e1e2e7 100644 (file)
--- a/perl/DXCommandmode.pm
+++ b/perl/DXCommandmode.pm
@@ -308,7 +308,7 @@ sub normal
                                if ($self->{state} eq 'talk') {
                                        $self->send_talks($_,  $self->msg('talkend'));
                                } else {
-                                       $self->send_chats($_,  $self->msg('chatend', $_));
+                                       $self->local_send('C', $self->msg('chatend', $_));
                                }
                        }
                        $self->state('prompt');

diff --git a/perl/Version.pm b/perl/Version.pm
index 21614f4ffd7b20d74de7bf17b201c946f6c1b3b4..28aa8a64328acd5433b6dcbd9e40d4bf93894bd1 100644 (file)
--- a/perl/Version.pm
+++ b/perl/Version.pm
@@ -11,6 +11,6 @@ use vars qw($version $subversion $build);
 
 $version = '1.54';
 $subversion = '0';
-$build = '94';
+$build = '95';
 
 1;