sydney/Autobot
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Clean up shutdown.

Browse Source
This commit is contained in:
Elijah Perrault committed 2011-02-15 14:18:48 -07:00
1 parent 55071e09d0
commit df401193dc
4 files changed
+17 -22
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

lib/Core/Cmd.pm
+2 -4
View File
@@ -142,8 +142,7 @@ sub cmd_shutdown
dbug "Got SHUTDOWN from ".$data{nick}."!".$data{user}."@".$data{host}."/".$data{svr}."! Shutting down. . .";
alog "Got SHUTDOWN from ".$data{nick}."!".$data{user}."@".$data{host}."/".$data{svr}."! Shutting down. . .";
quit($_, "SHUTDOWN from ".$data{nick}."/".$data{svr}) foreach (keys %Auto::SOCKET);
$Auto::DB->disconnect;
system("rm $Auto::Bin/auto.pid");
API::Std::event_run('on_shutdown');
exit;
# To appease PerlCritic.
@@ -164,8 +163,7 @@ sub cmd_restart
dbug "Got RESTART from ".$data{nick}."!".$data{user}."@".$data{host}."/".$data{svr}."! Restarting. . .";
alog "Got RESTART from ".$data{nick}."!".$data{user}."@".$data{host}."/".$data{svr}."! Restarting. . .";
quit($_, "RESTART from ".$data{nick}."/".$data{svr}) foreach (keys %Auto::SOCKET);
$Auto::DB->disconnect;
system("rm $Auto::Bin/auto.pid") if -e "$Auto::Bin/auto.pid";
API::Std::event_run('on_shutdown');
# Time to come back from the dead!
if ($Auto::DEBUG) {