Re: get-focus

From: Andrew Dorrell <andrewd_at_ee.uts.edu.au>
Date: Sun, 18 Feb 96 12:56:08 EST

There is a problem in the code you have written (and probably no problem with
the get-focus):

>
> Here's is what I see:
>
> > stk
> Welcome to the STk interpreter version 3.0b2 [HP-UX-9.X-9000s700]
> Copyright (C) 1993,1994,1995 Erick Gallesio - I3S - CNRS / ESSI <eg_at_unice.fr>
> STk> (require "Tk-classes")
> "Tk-classes"
> STk> (require "dialog")
> "dialog"
> STk> (define c (make <Canvas))
______________________________^ missing '>' after Canvas
        should be (define c (make <Canvas>))

>
> *** Error:
> unbound variable: <canvas

        This is the error message you should be paying attension to. The
remaining error messages are a result of (as is stated) a buggy error
reporting system...

>
> *** Error:
> unbound variable: get-focus
> WARNING: report-error is buggy!!
>
> *** Error:
> unbound variable: get-focus
> Current eval stack:
> __________________
> 0 (get-focus)
> 1 (set! stk::dialog-old-focus (get-focus))
> ...
>
>

-- 
------------------------------------------------------------------------------
Mr Andrew Dorrell
School of Electrical Engineering                 *
University of Technology, Sydney                     *
PO Box 123                                     *
Broadway NSW 2007                                   .  
AUSTRALIA
                                                    *       /---\  Whoo?
Phone:   61 2 330 2395                                      (o o) /
Fax:     61 2 330 2435                                      ( : )  
email:   andrewd_at_ee.uts.edu.au                               ^ ^     
    OR   dorrell_at_ihf.uts.edu.au
------------------------------------------------------------------------------

Received on Sun Feb 18 1996 - 02:58:12 CET