/[defwm]/Define-Window-Manager/src/events.lisp
ViewVC logotype

Diff of /Define-Window-Manager/src/events.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by rjain, Thu Feb 26 19:29:52 2004 UTC revision 1.2 by rjain, Thu Feb 26 21:00:38 2004 UTC
# Line 32  window managers and not to CLIM.")) Line 32  window managers and not to CLIM."))
32     (border-width :initarg :border-width)))     (border-width :initarg :border-width)))
33    
34  (defclass create-window-event (device-event window-configuration-mixin window-manager-event)  (defclass create-window-event (device-event window-configuration-mixin window-manager-event)
35    ((event-sheet :initarg :event-sheet)    ((event-sheet :initarg :event-sheet
36     (new-window :initarg :new-window)))                  :reader event-sheet)
37       (new-window :initarg :new-window
38                   :reader event-new-window)))
39    
40  (defclass destroy-window-event (device-event window-manager-event)  (defclass destroy-window-event (device-event window-manager-event)
41    ((event-sheet :initarg :event-sheet)    ((event-sheet :initarg :event-sheet
42                    :reader event-sheet)
43     (sheet :initarg :sheet)))     (sheet :initarg :sheet)))
44    
45  (defclass reparent-event (device-event window-manager-event)  (defclass reparent-event (device-event window-manager-event)

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

  ViewVC Help
Powered by ViewVC 1.1.5