[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/erc/erc.el,v
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/erc/erc.el,v |
Date: |
Sun, 27 Apr 2008 18:23:38 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Glenn Morris <gm> 08/04/27 18:23:37
Index: erc.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/erc/erc.el,v
retrieving revision 1.47
retrieving revision 1.48
diff -u -b -r1.47 -r1.48
--- erc.el 17 Apr 2008 05:02:14 -0000 1.47
+++ erc.el 27 Apr 2008 18:23:37 -0000 1.48
@@ -5043,9 +5043,9 @@
(setq value-list (mapcar (lambda (x)
t)
properties)))
- (mapcar* (lambda (prop value)
- (erc-put-text-property start end prop value object))
- properties value-list))
+ (dotimes (i (min (length properties) (length value-list)))
+ (erc-put-text-property start end (nth i properties)
+ (nth i value-list) object)))
;;; Input area handling: