mirror of
https://github.com/Ttanasart-pt/Pixel-Composer.git
synced 2024-12-27 23:46:56 +01:00
26 lines
No EOL
577 B
Text
26 lines
No EOL
577 B
Text
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();
|
|
} |