fixed bugs concerning listboxes

1 files changed, 1 insertions, 0 deletions

diff --git a/src/ivymon b/src/ivymon
index 3b4a3f3..3bfda55 100755
--- a/src/ivymon
+++ b/src/ivymon
@@ -1598,6 +1598,7 @@ sub sendMsg {
 sub selectMsgToSend {
     $sendEntry->focus;
     my $selindex = $sendList->curselection;
+    return unless defined $selindex;
     my $selected = $sendList->get($selindex);
     $sendEntry->delete(0, 'end');
     $sendEntry->insert(0, $selected);