* problem Tktable_Init
@ 2001-08-24 6:33 Kaoru Fukui
2001-08-24 6:44 ` Keith Seitz
0 siblings, 1 reply; 3+ messages in thread
From: Kaoru Fukui @ 2001-08-24 6:33 UTC (permalink / raw)
To: insight
Hi!
I was using 20010808 snapshot which was good.
When I updated the source from today's sorce.
The compilation has done,But it couldnot boot.
The error is that.
--------------
[root@g4mpKFUKUI Packages]# gdb
Tktable_Init failed: bad option "equal": must be compare, first, index, last,
length, match, range, tolower, toupper, trim, trimleft, trimright, wordend,
or wordstart
[root@g4mpKFUKUI Packages]#
-------------
My system is linuxppc.
Kaoru
^ permalink raw reply [flat|nested] 3+ messages in thread
* Re: problem Tktable_Init
2001-08-24 6:33 problem Tktable_Init Kaoru Fukui
@ 2001-08-24 6:44 ` Keith Seitz
2001-08-24 8:25 ` Kaoru Fukui
0 siblings, 1 reply; 3+ messages in thread
From: Keith Seitz @ 2001-08-24 6:44 UTC (permalink / raw)
To: Kaoru Fukui; +Cc: insight
On Fri, 24 Aug 2001, Kaoru Fukui wrote:
> [root@g4mpKFUKUI Packages]# gdb
> Tktable_Init failed: bad option "equal": must be compare, first, index, last,
> length, match, range, tolower, toupper, trim, trimleft, trimright, wordend,
> or wordstart
> [root@g4mpKFUKUI Packages]#
Wow, odd that this did not bite me... Nonetheless, here is a patch which
I think fixes the problem. (Someone tell me why "string equal" was
introduced to Tcl8.1??? Is it really that much easier to use [string equal
$foo $bar] than [string compare $foo $bar] = 0?)
Let me know how it goes.
Keith
2001-08-24 Keith Seitz <keiths@redhat.com>
* src/tkTable.tcl: Use "string compare" instead of "string
equal". The latter is only available in newer versions of
tcl.
Index: src/tkTable.tcl
===================================================================
RCS file: /cvs/src/src/libgui/src/tkTable.tcl,v
retrieving revision 1.2
diff -u -p -r1.2 tkTable.tcl
--- tkTable.tcl 2001/08/13 17:53:52 1.2
+++ tkTable.tcl 2001/08/24 13:44:36
@@ -189,7 +189,7 @@ if {[string match "macintosh" $tcl_platf
# Results:
# Returns the selection, or an error if none could be found
#
-if {[string equal $tcl_platform(platform) "unix"]} {
+if {[string compare $tcl_platform(platform) "unix"] == 0} {
proc ::tk::table::GetSelection {w {sel PRIMARY}} {
if {[catch {selection get -displayof $w -selection $sel \
-type UTF8_STRING} txt] \
^ permalink raw reply [flat|nested] 3+ messages in thread
* Re: problem Tktable_Init
2001-08-24 6:44 ` Keith Seitz
@ 2001-08-24 8:25 ` Kaoru Fukui
0 siblings, 0 replies; 3+ messages in thread
From: Kaoru Fukui @ 2001-08-24 8:25 UTC (permalink / raw)
To: Keith Seitz; +Cc: insight
From: Keith Seitz <keiths@cygnus.com>
>
> Wow, odd that this did not bite me... Nonetheless, here is a patch which
> I think fixes the problem. (Someone tell me why "string equal" was
> introduced to Tcl8.1??? Is it really that much easier to use [string equal
> $foo $bar] than [string compare $foo $bar] = 0?)
>
> Let me know how it goes.
> Keith
This patch is nice.
thanks so much
Kaoru
^ permalink raw reply [flat|nested] 3+ messages in thread
end of thread, other threads:[~2001-08-24 8:25 UTC | newest]
Thread overview: 3+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2001-08-24 6:33 problem Tktable_Init Kaoru Fukui
2001-08-24 6:44 ` Keith Seitz
2001-08-24 8:25 ` Kaoru Fukui
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).