From 7a75bb15ee30ecfd3ff39d16b55e493778d7e17f Mon Sep 17 00:00:00 2001 From: Daiki Ueno Date: Sat, 5 Mar 2005 02:23:31 +0000 Subject: [PATCH] * riece-log.el (riece-log-insinuate): Use user-uid instead of user-login-name and escape system-name for riece-log-lock-file. --- lisp/ChangeLog | 5 +++++ lisp/riece-log.el | 6 +++--- 2 files changed, 8 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 834dfc0..d8e4134 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2005-03-05 Daiki Ueno + + * riece-log.el (riece-log-insinuate): Use user-uid instead of + user-login-name and escape system-name for riece-log-lock-file. + 2005-03-02 Daiki Ueno * riece-log.el (riece-log-lock-file): Define with defvar. diff --git a/lisp/riece-log.el b/lisp/riece-log.el index 263bcd5..cca7233 100644 --- a/lisp/riece-log.el +++ b/lisp/riece-log.el @@ -255,9 +255,9 @@ If LINES is t, insert today's logs entirely." (defun riece-log-insinuate () (make-directory riece-log-directory t) (setq riece-log-lock-file - (expand-file-name (format "=lock.%s@%s.%d" - (user-login-name) - (system-name) + (expand-file-name (format "=%d-%d-%d" + (user-uid) + (riece-log-encode-file-name (system-name)) (emacs-pid)) riece-log-directory)) ;; FIXME: Use `riece-after-insert-functions' for trapping change, -- 2.25.1