| 
      
      
      From: Adrian A. <ad...@xe...> - 2004-03-27 23:05:45
      
     | 
| As discussed on #emacs today ...
I'll commit after review.
Best regards,
Adrian
Commit message:
2004-03-28  Adrian Aichner  <ad...@xe...>
	* erc.el (erc-cmd-BANLIST): Use `truncate-string-to-width' instead
        of `truncate-string' alias.
	* erc.el (erc-nickname-in-use):
erc source patch:
Diff command:   cvs -f -z3 -q diff -u -N
Files affected: erc.el
Index: erc.el
===================================================================
RCS file: /cvsroot/erc/erc/erc.el,v
retrieving revision 1.644
diff -u -r1.644 erc.el
--- erc.el	22 Mar 2004 08:24:48 -0000	1.644
+++ erc.el	27 Mar 2004 22:50:22 -0000
@@ -3822,9 +3822,9 @@
        (lambda (x)
          (erc-display-line
 	    (format fmt
-		    (truncate-string (cdr x) (/ erc-fill-column 2))
+		    (truncate-string-to-width (cdr x) (/ erc-fill-column 2))
 		    (if (car x)
-			(truncate-string (car x) (/ erc-fill-column 2))
+			(truncate-string-to-width (car x) (/ erc-fill-column 2))
 		      ""))
           'active))
        channel-banlist)
@@ -4561,7 +4561,7 @@
       (if erc-default-nicks
 	  (setq erc-default-nicks (cdr erc-default-nicks)))
       (if (not newnick)
-	  (setq newnick (concat (truncate-string
+	  (setq newnick (concat (truncate-string-to-width
 				 nick
 				 (if (and erc-connected nicklen)
 				     (- (string-to-int nicklen) 1)
-- 
Adrian Aichner
 mailto:ad...@xe...
 http://www.xemacs.org/
 |