mirror of
https://github.com/Ttanasart-pt/Pixel-Composer.git
synced 2024-11-16 07:23:52 +01:00
25 lines
573 B
Plaintext
25 lines
573 B
Plaintext
function close_program() {
|
|
PREF_SAVE();
|
|
if(PREFERENCES.clear_temp_on_close) directory_destroy(TEMPDIR);
|
|
game_end();
|
|
}
|
|
|
|
function window_close() {
|
|
CALL("exit");
|
|
|
|
var noSave = true;
|
|
|
|
for( var i = 0, n = array_length(PROJECTS); i < n; i++ ) {
|
|
var project = PROJECTS[i];
|
|
|
|
//print($"Project {filename_name_only(project)} modified: {project.modified} readonly: {project.readonly}");
|
|
if(project.modified && !project.readonly) {
|
|
var dia = dialogCall(o_dialog_exit,,,, true);
|
|
dia.project = project;
|
|
|
|
noSave = false;
|
|
}
|
|
}
|
|
|
|
if(noSave) close_program();
|
|
} |