Revert "cocoa: change the way the app is initialied"
This reverts commit 60101618db
.
While this changes fixes a 64-bit Lion problem, it creates a
worse problem of breaking file and print dialogs.
This commit is contained in:
parent
8a60e1816a
commit
9aa93ab5ae
|
@ -78,8 +78,7 @@
|
|||
(queue-file-event (string->path filename))]
|
||||
[-a _void (applicationDidFinishLaunching: [_id notification])
|
||||
(unless got-file?
|
||||
(queue-start-empty-event))
|
||||
(tellv app stop: self)]
|
||||
(queue-start-empty-event))]
|
||||
[-a _BOOL (applicationShouldHandleReopen: [_id app] hasVisibleWindows: [_BOOL has-visible?])
|
||||
;; If we have any visible windows, return #t to do the default thing.
|
||||
;; Otherwise return #f, because we don't want any invisible windows resurrected.
|
||||
|
@ -133,11 +132,7 @@
|
|||
(unless (zero? v)
|
||||
(log-error (format "error from CGDisplayRegisterReconfigurationCallback: ~a" v))))
|
||||
|
||||
;; To make sure that `finishLaunching' is called, call `run'
|
||||
;; and have `applicationDidFinishLaunching' quit the run loop,
|
||||
;; which seems to work better than calling `finishLaunching'
|
||||
;; directly.
|
||||
(tellv app run)
|
||||
(tellv app finishLaunching)
|
||||
|
||||
;; ------------------------------------------------------------
|
||||
;; Create an event to post when MzScheme has been sleeping but is
|
||||
|
|
Loading…
Reference in New Issue
Block a user