diff options
author | etienne | 2002-08-07 16:33:25 +0000 |
---|---|---|
committer | etienne | 2002-08-07 16:33:25 +0000 |
commit | 0c4e8bebe4c3bb81856e5f34f704ddf86d5b8682 (patch) | |
tree | 5b626b24b4b10a76cc6d4d5ccbb8c327062ff810 | |
parent | cac89c80ea89ff2c1294ae835a761a9aa2195af0 (diff) | |
download | ivymon-0c4e8bebe4c3bb81856e5f34f704ddf86d5b8682.zip ivymon-0c4e8bebe4c3bb81856e5f34f704ddf86d5b8682.tar.gz ivymon-0c4e8bebe4c3bb81856e5f34f704ddf86d5b8682.tar.bz2 ivymon-0c4e8bebe4c3bb81856e5f34f704ddf86d5b8682.tar.xz |
*** empty log message ***
-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'); |