CLIM mail archive


reverse video in pop-up accepting values window

The default pop-up accepting-values window (i.e., :own-window t)
appears black on white on a monchrome screen.  I have been unable to
reverse the appearance.


Attempt #1 (on the Symbolics):

(defmethod clim:run-frame-top-level :before ((frame accept-values))
  (with-slots (own-window) frame
     (setf (clim:medium-foreground own-window) clim::+white
           (clim:mdeium-background own-window) clim::+black+)))

and get an Output Hold that locks the display.  If I precede the setf with
(window-expose own-window), I am thrown in the debugger attempting to
expose a TEMP-CLIM-SHEET outside of its superior.


Attempt #2 (on the Symbolics):

(define-application-frame my-accept-values ()
   (:panes ((only-pane :application
                       :stream-foreground clim::+white+
                       :stream-background clim::+black+))))
and calling it via:

(accepting-values :frame-class 'my-accept-values) with no luck.

The :stream-foreground/background pane options seem to be ignored.


Thank you for any help you can give me.

Meir Laker
IBM Thomas J. Watson Research Center
P.O. Box 218, Yorktown Heights, NY 10598
Phone: 914-945-2699 Tieline: 862-2699


Main Index | Thread Index