File: kill.mpi

package info (click to toggle)
madoka 4.1.15-1
  • links: PTS
  • area: main
  • in suites: potato
  • size: 792 kB
  • ctags: 43
  • sloc: perl: 1,140; makefile: 42
file content (13 lines) | stat: -rw-r--r-- 332 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
# madoka 4.0 sv_kill
#
# server/kill.mpi
#    Copyright(c)1998- cookie / The madoka project
#

sub sv_kill {
  local($from, $pr) = @_;
  local($u, $reason) = ($pr =~ /^([^ ]+) *:?(.*)$/);
  &mes("[!] Killed by $from: $reason\n", 'ALL');
  &send('ccn', ":$from KILL $us_nick :$reason\n");
  &plugin('KILL', 'ALL', $from, $reason);
}