Update of /cvsroot/emacs-jabber/emacs-jabber/tests
In directory sc8-pr-cvs17.sourceforge.net:/tmp/cvs-serv13999/tests
Modified Files:
nick-change-fail.el
Log Message:
Revision: ma...@fr...--2005/emacs-jabber--cvs-head--0--patch-537
Creator: Magnus Henoch <ma...@fr...>
Add timeout to nick-change-fail test
Index: nick-change-fail.el
===================================================================
RCS file: /cvsroot/emacs-jabber/emacs-jabber/tests/nick-change-fail.el,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- nick-change-fail.el 17 Jun 2008 14:47:54 -0000 1.1
+++ nick-change-fail.el 17 Jun 2008 14:49:52 -0000 1.2
@@ -68,8 +68,9 @@
(jabberd-connect)
-(while (not ncf-done)
- (sit-for 0.1))
+(with-timeout (5 (error "Timeout"))
+ (while (not ncf-done)
+ (sit-for 0.1)))
(when ncf-error
(princ
(format
|
