Commit 927fc92e authored by Iban Hatchondo's avatar Iban Hatchondo
Browse files

use (setf xlib:window-priority) instead of (setf window-priority) when...

use (setf xlib:window-priority) instead of (setf window-priority) when changing the stacking order of a box-button.
parent 68355290
;;; -*- Mode: Lisp; Package: ECLIPSE-INTERNALS -*-
;;; $Id: input.lisp,v 1.18 2003/10/06 17:57:26 ihatchondo Exp $
;;; $Id: input.lisp,v 1.19 2003/10/09 11:38:18 ihatchondo Exp $
;;;
;;; ECLIPSE. The Common Lisp Window Manager.
;;; Copyright (C) 2000, 2001, 2002 Iban HATCHONDO
......@@ -478,4 +478,4 @@
;;; Events for Message Box
(defmethod event-process ((event visibility-notify) (box box-button))
(setf (window-priority (widget-window box)) :above))
\ No newline at end of file
(setf (xlib:window-priority (widget-window box)) :above))
\ No newline at end of file
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment