Re: Using BLT with STk 2.1.5

From: Rob DeLine <Robert_DeLine_at_GS115.SP.CS.CMU.EDU>
Date: Wed, 01 Feb 1995 12:31:54 -0500

Motoyuki Kawaba suggests:

> STk_Blt_Init fails when winfo isn't a tk-command.
> `winfo` is redefined in Basics.stk.
>
> I avoid this trouble by modifying blt.stk in the following.
>
> ;; ---------------------------
> ;; Patched by Kawaba 95.1.7
> (define winfo-original #f)
> (when (symbol-bound? 'tk:winfo)
> (set! winfo-original winfo)
> (set! winfo tk:winfo))
>
> (if (symbol-bound? '|blt_versions{BLT}|)
> ;; Blt table module is in the core interpreter
> 'blt_static
> ;; Try to load blt table dynamically
> (load "blt.so"))
> (set! winfo winfo-original)
>
> (provide "blt")
> ;; ---------------------------


This suggestion fixed the trouble I was having with BLT, thanks!
Perhaps this change can get encorporated into the official version?

Rob DeLine
Received on Wed Feb 01 1995 - 18:33:54 CET