[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Erbot-cvs] erbot erbot.el ChangeLog
From: |
D. Goel |
Subject: |
[Erbot-cvs] erbot erbot.el ChangeLog |
Date: |
Fri, 07 Apr 2006 16:53:11 +0000 |
CVSROOT: /cvsroot/erbot
Module name: erbot
Branch:
Changes by: D. Goel <address@hidden> 06/04/07 16:53:11
Modified files:
. : erbot.el ChangeLog
Log message:
allow \t even though control character.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/erbot/erbot/erbot.el.diff?tr1=1.49&tr2=1.50&r1=text&r2=text
http://cvs.savannah.gnu.org/viewcvs/erbot/erbot/ChangeLog.diff?tr1=1.39&tr2=1.40&r1=text&r2=text
Patches:
Index: erbot/ChangeLog
diff -u erbot/ChangeLog:1.39 erbot/ChangeLog:1.40
--- erbot/ChangeLog:1.39 Tue Feb 28 14:42:40 2006
+++ erbot/ChangeLog Fri Apr 7 16:53:11 2006
@@ -1,3 +1,13 @@
+2006-04-07 D Goel <address@hidden>
+
+ * erbot.el (erbot-safe-make): Exception to control characters:
+ Allow \t
+
+2006-03-21 D Goel <address@hidden>
+
+ * erbot.el (erbot-safe-make): new function.
+ (erbot-reply): call erbot-safe-make before replying.
+
2006-02-28 Michael Olson <address@hidden>
* ChangeLog: Remove use of CVS Revision tag.
Index: erbot/erbot.el
diff -u erbot/erbot.el:1.49 erbot/erbot.el:1.50
--- erbot/erbot.el:1.49 Tue Mar 21 15:47:25 2006
+++ erbot/erbot.el Fri Apr 7 16:53:11 2006
@@ -1,5 +1,5 @@
;;; erbot.el --- Another robot for ERC.
-;; Time-stamp: <2006-03-21 10:44:19 deego>
+;; Time-stamp: <2006-04-07 12:51:41 deego>
;; Emacs Lisp Archive entry
;; Filename: erbot.el
;; Package: erbot
@@ -872,7 +872,10 @@
(when (string-match "^/" line)
(unless (string-match "^/me " line)
(setq ans (concat " " line))))
- (when (member-if (lambda (a) (< a 32)) rlist)
+ (when (member-if (lambda (a)
+ (and (< a 32)
+ (not (= a 9))))
+ rlist)
(setq ans "<control characters>"))
(when (string-match "[\n\r]" line)
(setq ans " <newlines> "))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Erbot-cvs] erbot erbot.el ChangeLog,
D. Goel <=