mirror of
https://github.com/Ttanasart-pt/Pixel-Composer.git
synced 2024-12-26 15:06:22 +01:00
23 lines
No EOL
569 B
Text
23 lines
No EOL
569 B
Text
function close_program() {
|
|
PREF_SAVE();
|
|
if(PREF_MAP[? "clear_temp_on_close"]) directory_destroy(DIRECTORY + "temp");
|
|
game_end();
|
|
}
|
|
|
|
function window_close() {
|
|
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();
|
|
} |