Richard Stallman <rms <at> gnu.org> writes: > > Does this fix it?
Yes, it fixes part of the problem. But the next bug is revealed when I use your fix: [EMAIL PROTECTED] emacs]$ \rm -fr /tmp/emacs800154870/ [EMAIL PROTECTED] emacs]$ cat fixsrvbug.el (defvar server-socket-dir (let ((uid (user-uid))) (if (floatp uid) (format "/tmp/emacs%1.0f" uid) (format "/tmp/emacs%d" uid)))) (require 'server) (server-ensure-safe-dir server-socket-dir) [EMAIL PROTECTED] emacs]$ emacs -f toggle-debug-on-error -q -l fixsrvbug.el [... produces this stacktrace: ] Debugger entered--Lisp error: (error "The directory /tmp/emacs800154870 is unsafe") signal(error ("The directory /tmp/emacs800154870 is unsafe")) error("The directory %s is unsafe" "/tmp/emacs800154870") server-ensure-safe-dir("/tmp/emacs800154870") eval-buffer(#<buffer *load*> nil "/home/ruttbe/emacs/fixsrvbug.el" nil t) ; Reading at buffer position 203 load-with-code-conversion ("/home/ruttbe/emacs/fixsrvbug.el" "/home/ruttbe/emacs/fixsrvbug.el" nil t) load("/home/ruttbe/emacs/fixsrvbug.el" nil t) command-line-1(("-f" "toggle-debug-on-error" "-l" "fixsrvbug.el")) command-line() normal-top-level() [EMAIL PROTECTED] emacs]$ ls -al /tmp/emacs800154870/ total 64 drwx------ 2 ruttbe www 117 Jan 8 10:55 ./ drwxrwxrwt 39 root sys 20552 Jan 8 10:55 ../ I think that it's due to some problem in `file-attributes' based on stepping through previously with edebug but I cannot use edebug now via C-u C-M-x on `server-ensure-safe-dir' in server.el.gz for some reason (I get error edebug- syntax-error: Invalid read syntax: "Expected lambda expression") and at the same time the cursor is put at the following place: (letf (((default-file-modes) ?\700)) (make-directory dir t)) ^ | | Any help is appreciated. Thanks. --BR _______________________________________________ emacs-pretest-bug mailing list emacs-pretest-bug@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug