CLIM mail archive
Bug-report

To: clim@BBN.COM, bugs@franz.com, hummel@pdesds1.scra.org
Subject: Bug-report
From: Jim Sims <sims@pdesds1.scra.org>
Date: Thu, 14 Oct 93 11:09:59 EDT
 Allegro 4.x, Clim 1.1, Sparc 10

 I'm trying to smash together a bunch of independent frames into one
 mondo frame. In the course of this exercise, i get them together, but
 notice a 'problem'. Some of the pane definitions seem to have
 multiple values for things like :default-text-style (some are actual
 text styles, some arent), :incremental-redisplay,
 :redisplay-function, etc

 Here's a frame defintion and the associated stuff....

jim

SMASHER(274): (clim::find-frame-descriptor 'drawing::drawing-window)
#<CLIM::FRAME-DESCRIPTOR DRAWING-WINDOW @ #x173fb5e>
SMASHER(275): (clim::frame-descriptor-pane-descriptions *)
((DRAWING::MENU-PANE :COMMAND-MENU :DEFAULT-TEXT-STYLE (:FIX :ROMAN :SMALL) :BORDERS T :DEFAULT-TEXT-STYLE
  #<CLIM::TEXT-STYLE :SANS-SERIF.:ROMAN.:LARGE @ #xb444e6> :INCREMENTAL-REDISPLAY T ...)
 (DRAWING::DISPLAY-AREA :APPLICATION :DEFAULT-TEXT-STYLE (:FIX :ROMAN :SMALL) :SCROLL-BARS :BOTH :BORDERS T
  :REDISPLAY-AFTER-COMMANDS T ...)
 (DRAWING::GRAPHIC-MENU :APPLICATION :DEFAULT-TEXT-STYLE (:FIX :ROMAN :SMALL) :SCROLL-BARS :NONE :BORDERS NIL
  :REDISPLAY-AFTER-COMMANDS T ...)
 (DRAWING::DOC-PANE :POINTER-DOCUMENTATION :DEFAULT-TEXT-STYLE (:FIX :ROMAN :SMALL) :REDISPLAY-AFTER-COMMANDS T
  :DEFAULT-TEXT-STYLE #<CLIM::TEXT-STYLE :SANS-SERIF.:BOLD.:NORMAL @ #xc2a2f6> :DISPLAY-AFTER-COMMANDS NIL ...))
SMASHER(276): (print (setq pane (first (setq panes *))))

(DRAWING::MENU-PANE :COMMAND-MENU :DEFAULT-TEXT-STYLE (:FIX :ROMAN :SMALL) :BORDERS T :DEFAULT-TEXT-STYLE
 #<CLIM::TEXT-STYLE :SANS-SERIF.:ROMAN.:LARGE @ #xb444e6> :INCREMENTAL-REDISPLAY T :DISPLAY-FUNCTION DISPLAY-COMMAND-MENU
 :DISPLAY-AFTER-COMMANDS T :DEFAULT-SIZE :COMPUTE :SCROLL-BARS NIL) 
(DRAWING::MENU-PANE :COMMAND-MENU :DEFAULT-TEXT-STYLE (:FIX :ROMAN :SMALL) :BORDERS T :DEFAULT-TEXT-STYLE
 #<CLIM::TEXT-STYLE :SANS-SERIF.:ROMAN.:LARGE @ #xb444e6> :INCREMENTAL-REDISPLAY T ...)
SMASHER(277): (print panes)

((DRAWING::MENU-PANE :COMMAND-MENU :DEFAULT-TEXT-STYLE (:FIX :ROMAN :SMALL) :BORDERS T :DEFAULT-TEXT-STYLE
  #<CLIM::TEXT-STYLE :SANS-SERIF.:ROMAN.:LARGE @ #xb444e6> :INCREMENTAL-REDISPLAY T :DISPLAY-FUNCTION DISPLAY-COMMAND-MENU
  :DISPLAY-AFTER-COMMANDS T :DEFAULT-SIZE :COMPUTE :SCROLL-BARS NIL)
 (DRAWING::DISPLAY-AREA :APPLICATION :DEFAULT-TEXT-STYLE (:FIX :ROMAN :SMALL) :SCROLL-BARS :BOTH :BORDERS T
  :REDISPLAY-AFTER-COMMANDS T :DEFAULT-SIZE :REST)
 (DRAWING::GRAPHIC-MENU :APPLICATION :DEFAULT-TEXT-STYLE (:FIX :ROMAN :SMALL) :SCROLL-BARS :NONE :BORDERS NIL
  :REDISPLAY-AFTER-COMMANDS T :DEFAULT-SIZE :REST)
 (DRAWING::DOC-PANE :POINTER-DOCUMENTATION :DEFAULT-TEXT-STYLE (:FIX :ROMAN :SMALL) :REDISPLAY-AFTER-COMMANDS T
  :DEFAULT-TEXT-STYLE #<CLIM::TEXT-STYLE :SANS-SERIF.:BOLD.:NORMAL @ #xc2a2f6> :DISPLAY-AFTER-COMMANDS NIL :DEFAULT-SIZE :COMPUTE
  :SCROLL-BARS NIL)) 
((DRAWING::MENU-PANE :COMMAND-MENU :DEFAULT-TEXT-STYLE (:FIX :ROMAN :SMALL) :BORDERS T :DEFAULT-TEXT-STYLE
  #<CLIM::TEXT-STYLE :SANS-SERIF.:ROMAN.:LARGE @ #xb444e6> :INCREMENTAL-REDISPLAY T ...)
 (DRAWING::DISPLAY-AREA :APPLICATION :DEFAULT-TEXT-STYLE (:FIX :ROMAN :SMALL) :SCROLL-BARS :BOTH :BORDERS T
  :REDISPLAY-AFTER-COMMANDS T ...)
 (DRAWING::GRAPHIC-MENU :APPLICATION :DEFAULT-TEXT-STYLE (:FIX :ROMAN :SMALL) :SCROLL-BARS :NONE :BORDERS NIL
  :REDISPLAY-AFTER-COMMANDS T ...)
 (DRAWING::DOC-PANE :POINTER-DOCUMENTATION :DEFAULT-TEXT-STYLE (:FIX :ROMAN :SMALL) :REDISPLAY-AFTER-COMMANDS T
  :DEFAULT-TEXT-STYLE #<CLIM::TEXT-STYLE :SANS-SERIF.:BOLD.:NORMAL @ #xc2a2f6> :DISPLAY-AFTER-COMMANDS NIL ...))
SMASHER(278):
Prev: with-output-as-presentation
Next: Bug-report
Index: CLIM Mailing list (1-Jan-93 to 31-May-94)
Thread: CLIM Mailing list Index (1-Jan-93 to 31-May-94)
Main Index | Thread Index