[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Erbot-cvs] Changes to erbot/erbc.el
From: |
D . Goel |
Subject: |
[Erbot-cvs] Changes to erbot/erbc.el |
Date: |
Fri, 01 Apr 2005 13:16:00 -0500 |
Index: erbot/erbc.el
diff -u erbot/erbc.el:1.99 erbot/erbc.el:1.100
--- erbot/erbc.el:1.99 Fri Apr 1 16:47:52 2005
+++ erbot/erbc.el Fri Apr 1 18:16:00 2005
@@ -1,5 +1,5 @@
;;; erbc.el --- Erbot user-interface commands.
-;; Time-stamp: <2005-04-01 11:44:28 deego>
+;; Time-stamp: <2005-04-01 13:14:13 deego>
;; Copyright (C) 2002 D. Goel
;; Emacs Lisp Archive entry
;; Filename: erbc.el
@@ -551,6 +551,12 @@
(setq msg (subseq msg 0 -1)))))
msg)
+(defvar erbn-dead-check-p nil
+ "If non-nil, we will not reply to people who have shot themselves
+using mark-dead or russian roulette. These people need to be revived
+first. Of course, like any magic, revival sometimes works, and
+sometimes doesn't.")
+
(defun fsi-lispify (&optional msg proc nick tgt localp
userinfo &rest foo)
"Parse the english MSG into a lisp command.
@@ -919,7 +925,9 @@
;; do a dead check
- (erbn-dead-check)
+ (when erbn-dead-check-p (and (not foundquery)
+ (erbn-dead-check)))
+
(setq
newmsglist
@@ -4565,7 +4573,7 @@
(defalias 'fs-gn 'fs-google-nevadamissouri)
(defalias 'fs-gp 'fs-google-planetmath)
(defalias 'fs-gt 'fs-google-twiki)
-(defalias 'fs-gu 'fs-google-usemod)
+;;(defalias 'fs-gu 'fs-google-usemod)
(defalias 'fsi-mark 'mark)
(defalias 'fsi-point 'point)
- [Erbot-cvs] Changes to erbot/erbc.el, D . Goel, 2005/04/01
- [Erbot-cvs] Changes to erbot/erbc.el,
D . Goel <=
- [Erbot-cvs] Changes to erbot/erbc.el, D . Goel, 2005/04/06
- [Erbot-cvs] Changes to erbot/erbc.el, D . Goel, 2005/04/06
- [Erbot-cvs] Changes to erbot/erbc.el, D . Goel, 2005/04/06
- [Erbot-cvs] Changes to erbot/erbc.el, D . Goel, 2005/04/07
- [Erbot-cvs] Changes to erbot/erbc.el, D . Goel, 2005/04/08
- [Erbot-cvs] Changes to erbot/erbc.el, D . Goel, 2005/04/13
- [Erbot-cvs] Changes to erbot/erbc.el, Yann Hodique, 2005/04/16
- [Erbot-cvs] Changes to erbot/erbc.el, D . Goel, 2005/04/28
- [Erbot-cvs] Changes to erbot/erbc.el, D . Goel, 2005/04/28