diff options
-rwxr-xr-x | src/ivymon | 5 |
1 files changed, 4 insertions, 1 deletions
@@ -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'); |