Iconifying screens

Article View: gnu.epoch.misc

Article #1861

#1861

From: David Disser
Date: Mon, 03 Jun 1991 21:57

19 lines
1231 bytes

I'd like to be able to iconify all my Epoch screens at once by iconifying
the minibuffer.  I'm trying this code:

(defun handle-iconify-event (type event screen)
  (if (eq event nil)
      (if (eq screen (epoch::minibuf-screen))
	  (while (epoch::iconify-screen (epoch::next-screen))))
    (on-event::handler type event screen)))
(push-event 'map 'handle-iconify-event)

When I iconify the minibuffer, all my screens close, but the last one
cycles mapped and unmapped ad infinitum.  Any suggestions?

--

)  Dave Disser                  CAEN User Services
)  disser@engin.umich.edu       229 Chrysler Center   
)                               Ann Arbor, MI 48109-2092

Technical Details

Message-ID: <DISSER.91Jun3165703@koko.engin.umich.edu>

Path: arc1-ca.pugleaf.net!gmdzi!unido!mcsun!uunet!elroy.jpl.nasa.gov!swrinde!mips!samsung!caen!srvr1!disser

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: fc7ee,52f98cb78bd4fa50,start
X-Google-Attributes: gidfc7ee,public
X-Google-ArrivalTime: 1991-06-03 22:26:50 PST
Path: arc1-ca.pugleaf.net!gmdzi!unido!mcsun!uunet!elroy.jpl.nasa.gov!swrinde!mips!samsung!caen!srvr1!disser
From: disser@engin.umich.edu (David Disser)
Newsgroups: gnu.epoch.misc
Subject: Iconifying screens
Message-ID: <DISSER.91Jun3165703@koko.engin.umich.edu>
Date: 3 Jun 91 21:57:03 GMT
Reply-To: disser@caen.engin.umich.edu
Organization: The University of Michigan
Lines: 19