From 72acfccdfdcd9984c41cf8844c3afda7669551fd Mon Sep 17 00:00:00 2001 From: etienne Date: Thu, 17 Aug 2006 13:29:11 +0000 Subject: Tk804 compliant --- src/ivymon | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) (limited to 'src') diff --git a/src/ivymon b/src/ivymon index 5d70d92..a419f60 100755 --- a/src/ivymon +++ b/src/ivymon @@ -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'); -- cgit v1.1