Browse Source

Roll back the Flare integration temporarily.

master
isoraqathedh 3 years ago
parent
commit
2fc97b88a3
1 changed files with 6 additions and 5 deletions
  1. +6
    -5
      window.lisp

+ 6
- 5
window.lisp View File

@ -37,11 +37,12 @@
(defmethod initialize-instance :after ((qstage qstage) &key &allow-other-keys)
(setf (q+:fixed-size qstage) (values (stage-width qstage)
(stage-height qstage)))
(flare:start (scene qstage))
(flare:start (flare:enter
(flare:progression-instance
(progression qstage))
(scene qstage))))
;; (flare:start (scene qstage))
;; (flare:start (flare:enter
;; (flare:progression-instance
;; (progression qstage))
;; (scene qstage)))
)
(define-subwidget (main-window the-stage) (make-instance 'qstage))

Loading…
Cancel
Save