From 0c4e8bebe4c3bb81856e5f34f704ddf86d5b8682 Mon Sep 17 00:00:00 2001 From: etienne Date: Wed, 7 Aug 2002 16:33:25 +0000 Subject: *** empty log message *** --- src/ivymon | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'src') diff --git a/src/ivymon b/src/ivymon index e9107c4..c1711c6 100755 --- a/src/ivymon +++ b/src/ivymon @@ -1316,11 +1316,11 @@ sub addMsgToSend { sub sendMsg { my $entry = shift; - $ivy->sendMsgs($entry); $messagesNumber++; &beforeUpdatingMessages; &updateMessages($appname, $entry); &afterUpdatingMessages; + $ivy->sendMsgs($entry); } # end sendMsg @@ -1987,6 +1987,8 @@ sub findRvalue { $entry->selectionClear; if ($rvalue =~ /(^\S+)/) { $rvalue = $1; + # skip char ) at the end of string + $rvalue =~ s/\)$//; $entry->selectionFrom($index+1); $entry->selectionTo($index +1 + length($rvalue)); } @@ -2015,6 +2017,7 @@ sub warning2 { } # end warning2 + sub warning3 { my $widget = shift; $widget->configure(-foreground => 'red'); -- cgit v1.1