mkbotpass.sh: Utility to generate `botpass.tcl'.

[ircbot] / mkbotpass.sh

diff --git a/mkbotpass.sh b/mkbotpass.sh
new file mode 100755 (executable)
index 0000000..6a3af70
--- /dev/null
+++ b/mkbotpass.sh
@@ -0,0 +1,7 @@
+#! /bin/sh -e
+rm -f botpass.tcl.new
+umask 077
+cat <<EOF >botpass.tcl.new
+set botpass $(gorp 128)
+EOF
+mv botpass.tcl.new botpass.tcl