Editor/pointer-doc pane problem.

• To: cl-bugs@franz.com
• Subject: Editor/pointer-doc pane problem.
• From: Rick Duffy <duffy@pogo.den.mmc.com>
• Date: Fri, 5 Nov 1993 11:21:57 -0700
• Cc: clim@BBN.COM

I'm having a problem with either text-editor panes or a pointer-doc pane. 
I'm running Allegro Common Lisp CL 4.2.beta2.0 and CLIM 2.0.beta on
a Sparc 10, running Sunos 4.1.3.

Below is a very simple frame which demonstrates the problem:

_____________________________________________________________
;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Package: CLIM-USER; Base: 10 -*-

(in-package :clim-user)

(clim:define-application-frame test-frame ()
  ()
  (:pointer-documentation t)
  (:panes (text text-editor :ncolumns 40))
  (:layouts (default text)))

(defun test ()
  (clim:run-frame-top-level (clim:make-application-frame 'test-frame)))

_____________________________________________________________

;; When I run this (in the CLIM-USER package), a very simple window
;; is displayed.  When I grow it, all is fine.  When I then try to
;; shrink it, I get the following: 


Error: Trying to resize sheet #<CLIM:POINTER-DOCUMENTATION-PANE @ #xab94f2>
to be too small
       (361 x 0)

Restart actions (select using :continue):
 0: Restart event loop for #<OPENLOOK-PORT>
 1: Exit event loop for #<OPENLOOK-PORT>
[Current process: CLIM Event Dispatcher for (OPENLOOK)]
[1] USER(1): :zo
Evaluation stack:

   (ERROR "Trying to resize sheet ~S to be too small (~D x ~D)"
          #<CLIM:POINTER-DOCUMENTATION-PANE @ #xab94f2> ...)
 ->((METHOD CLIM:RESIZE-SHEET (CLIM:BASIC-SHEET T T))
      #<CLIM:POINTER-DOCUMENTATION-PANE @ #xab94f2> 361 ...)
   [... CLIM:RESIZE-SHEET]
   ((METHOD CLIM:MOVE-AND-RESIZE-SHEET (CLIM:BASIC-SHEET T T T T))
      #<CLIM:POINTER-DOCUMENTATION-PANE @ #xab94f2> 0 ...)
   [... CLIM:MOVE-AND-RESIZE-SHEET]
   ((:INTERNAL (:INTERNAL (METHOD CLIM:ALLOCATE-SPACE (CLIM:VBOX-PANE T T))
0) 0)
      #<CLIM:POINTER-DOCUMENTATION-PANE @ #xab94f2> 0)
   (MAPC #<Closure # @ #xb3437a> (# # #) ...)
   ((METHOD CLIM:ALLOCATE-SPACE (CLIM:VBOX-PANE T T)) #<CLIM:VBOX-PANE @
#xab9ed2> 361 ...)
   [... CLIM:ALLOCATE-SPACE]
   ((METHOD SILICA:NOTE-LAYOUT-MIXIN-REGION-CHANGED (SILICA:LAYOUT-MIXIN))
      #<CLIM:VBOX-PANE @ #xab9ed2> :PORT ...)
   (:EFFECTIVE-METHOD #<CLIM:VBOX-PANE @ #xab9ed2> :PORT ...)
   [... SILICA:NOTE-LAYOUT-MIXIN-REGION-CHANGED]
   ((METHOD CLIM:NOTE-SHEET-REGION-CHANGED :AFTER (SILICA:LAYOUT-MIXIN))
      #<CLIM:VBOX-PANE @ #xab9ed2>)
   (:EFFECTIVE-METHOD #<CLIM:VBOX-PANE @ #xab9ed2>)
   [... CLIM:NOTE-SHEET-REGION-CHANGED]
   ((METHOD CLIM:RESIZE-SHEET (CLIM:BASIC-SHEET T T)) #<CLIM:VBOX-PANE @
#xab9ed2> 361 ...)
   [... CLIM:RESIZE-SHEET]

... more older frames ...
[Current process: CLIM Event Dispatcher for (OPENLOOK)]
[1] USER(2): 

___________________________________________________________________

(I'm also having a problem with text-editor panes overwriting panes
displayed below them, but it's more complicated to reproduce, and I 
think the problem may be related, so I'll save that one for later.)




... Rick
duffy@pogo.den.mmc.com

• Prev: lisp/clim on sgi?
• Next: Re: Editor/pointer-doc pane problem.
• Index: CLIM Mailing list (1-Jan-93 to 31-May-94)
• Thread: CLIM Mailing list Index (1-Jan-93 to 31-May-94)