Switch to 1 destruct level
FossilOrigin-Name: 5a8202cbb4c52a74b5467c82b721e15b9c8e109d7e954dc659300fc01c684ff4
This commit is contained in:
parent
0617cdbd87
commit
f1ef5c6fa0
2 changed files with 2 additions and 2 deletions
|
@ -87,7 +87,7 @@ void render_base_page(struct base_page* page, FCGX_Request* req, struct session*
|
|||
char* dup = PERL_GET_STACK_EXIT;
|
||||
|
||||
send_result(req, NULL, "text/html", dup, 0);
|
||||
|
||||
|
||||
mstdnt_cleanup_notifications(notifs, notifs_len);
|
||||
mastodont_storage_cleanup(&storage);
|
||||
Safefree(dup);
|
||||
|
|
|
@ -247,7 +247,7 @@ int main(int argc, char **argv, char **env)
|
|||
|
||||
perl_parse(my_perl, xs_init, (sizeof(perl_argv) / sizeof(perl_argv[0])) - 1, perl_argv, (char**)NULL);
|
||||
PL_exit_flags |= PERL_EXIT_DESTRUCT_END;
|
||||
PL_perl_destruct_level = 2;
|
||||
PL_perl_destruct_level = 1;
|
||||
perl_run(my_perl);
|
||||
|
||||
init_template_files(aTHX);
|
||||
|
|
Loading…
Reference in a new issue