diff options
-rwxr-xr-x | src/ivymon | 11 |
1 files changed, 8 insertions, 3 deletions
@@ -797,12 +797,18 @@ sub addIvyBinding { my $binding = shift; #print "in addIvyBinding $binding\n"; $ivy->bindRegexp($binding, [sub { + my $sender = shift; + my $message; + for (my $i = 0; $i < @_; $i++) { + $_[$i] = '"'.$_[$i].'"'; + } + $message = join(' ', @_); $messagesNumber++; if ($stopFlag) { - &bufferizeMessages(@_); + &bufferizeMessages($sender, $message); } else { &beforeUpdatingMessages; - &updateMessages(@_); + &updateMessages($sender, $message); &afterUpdatingMessages; } }]); @@ -1106,7 +1112,6 @@ sub beforeUpdatingMessages { sub updateMessages { my ($sender, $message) = @_; chomp($message); - $message = '"' . $message . '"' ; # If scrolling is available, format and then display message. # Unless file has been loaded, look at history : compare widget text lines # number with history size |