🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

2 total messages Started by Peter E. Wagner Wed, 20 Nov 1991 05:14
Trying to put an Epoch screen in predefined window
#1694
Author: Peter E. Wagner
Date: Wed, 20 Nov 1991 05:14
26 lines
1623 bytes
I have a window and its ID, i.e the 32 bit integer returned by
XtWindow().  I want to create a screen and have that screen end up in
my window.  Here's my attempt (note that I don't know Lisp :-( )

(setq epoch::screen-properties (list
(cons 'parent epoch::string-to-resource "8388629" Window)))
(epoch::map-screen (epoch::create-screen))

This doesn't work.  I get:

    Wrong number of arguments: #<subr cons>, 4

I gather from the manual that I have to convert the window ID into
some kind of atom or something, but I'm obviously missing something.
I pretty much have no idea what I'm doing here, no examples, and a
fairly obtuse manual.  Does anyone have any experience with this sort
of thing?  Any code examples?  Any tips appreciated here.  Thanks!

    Peter

-- 
----------------------------------------------------------------
Peter E. Wagner          (401)863-7685        pew@cs.brown.edu
Department Computer Science   Box 1910        pew@BROWNCS.BITNET
Brown University, Providence, RI 02912        uunet!brunix!pew
----------------------------------------------------------------
Trying to put an Epoch screen in predefined window
#1695
Author: John Stracke
Date: Wed, 20 Nov 1991 14:54
21 lines
1441 bytes
>(setq epoch::screen-properties (list
>(cons 'parent epoch::string-to-resource "8388629" Window)))

As a guess, I'd say this line should be

  (cons 'parent (epoch::string-to-resource "8388629" Window) )))

>This doesn't work.  I get:

>    Wrong number of arguments: #<subr cons>, 4

This would be because cons takes 2 arguments.

/===========================================================================\
|John (Francis) Stracke         |My opinions are my own.                    |
|Natl. Science Center Foundation|===========================================|
|Augusta, GA                    |What do you mean, *you're*                 |
|francis@dogwood.atl.ga.us      | a solipsist?                              |
\===========================================================================/
(Formerly francis@zaphod.uchicago.edu)
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads