diff --git a/collects/framework/private/autosave.rkt b/collects/framework/private/autosave.rkt index 2fc4e4ef..e5145483 100644 --- a/collects/framework/private/autosave.rkt +++ b/collects/framework/private/autosave.rkt @@ -144,7 +144,7 @@ [filtered-table (filter (λ (x) (file-exists? (cadr x))) table)]) (unless (null? filtered-table) - (let* ([dlg (new dialog% + (let* ([dlg (new (frame:focus-table-mixin dialog%) (label (string-constant recover-autosave-files-frame-title)))] [t (new text% (auto-wrap #t))] [ec (new editor-canvas%