X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshu.pl;fp=cmd%2Fshu.pl;h=9ba65b5b7f42fff18354703fb03c1d61cfdc81b0;hb=86b2012061c37c8f5235bd6488a3a83dff3ea5f1;hp=0000000000000000000000000000000000000000;hpb=4d30398c77d24a717cd4daae618f8d16e8d069c0;p=spider.git

diff --git a/cmd/shu.pl b/cmd/shu.pl
new file mode 100644
index 00000000..9ba65b5b
--- /dev/null
+++ b/cmd/shu.pl
@@ -0,0 +1,15 @@
+#
+# Command to force people to type at least 'shut' to shutdown
+#
+# Copyright (c) 2002 Dirk Koopman G1TLH
+#
+# $Id$
+#
+
+my $self = shift;
+
+if ($self->priv >= 5) {
+	return (1, $self->msg('shu'))
+} else {
+	return (1, $self->msg('e1'));
+}