From 0b4f64c9ca6ccc175fafedfea761bceefee15b83 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Wed, 15 Mar 2006 09:03:19 +0000 Subject: [PATCH] Synch to No Gnus 200603150849. --- lisp/message.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/message.el b/lisp/message.el index 1b02cf0..cc5a210 100644 --- a/lisp/message.el +++ b/lisp/message.el @@ -5350,7 +5350,7 @@ In posting styles use `(\"Expires\" (make-expires-date 30))'." (concat (if (or (memq system-type '(ms-dos emx vax-vms)) ;; message-number-base36 doesn't handle bigints. - (float (user-uid))) + (floatp (user-uid))) (let ((user (downcase (user-login-name)))) (while (string-match "[^a-z0-9_]" user) (aset user (match-beginning 0) ?_)) -- 1.7.10.4