diff options
-rwxr-xr-x | src/ivymon | 9 |
1 files changed, 7 insertions, 2 deletions
@@ -529,8 +529,13 @@ my $bgcolor = $messagesText->cget(-background); $messagesText->tagConfigure('sender', -background => 'gray50', -foreground => 'gray90'); -$messagesText->tagConfigure('time', - -state => 'hidden'); +my @hide_option; +if ($Tk::VERSION ge 804) { + @hide_option = (-elide => 1); +} else { + @hide_option = (-state => 'hidden'); +} +$messagesText->tagConfigure('time', @hide_option); $messagesText->tagConfigure($appname, -foreground => 'gray30'); $messagesText->tagConfigure('marker0', -background => 'lightcoral', -foreground => 'lightcoral'); |