Re: ensure safe directory failing

[Eli Zaretskii <eliz@gnu.org>]

> Date: Sat, 19 Mar 2011 12:39:54 -0500
> From: "B. T. Raven" <nihil@nihilo.net>
> 
> > --- lisp/server.el	2011-01-02 23:50:46 +0000
> > +++ lisp/server.el	2011-03-11 12:19:08 +0000
> > @@ -474,7 +474,13 @@ See variable `server-auth-dir' for detai
> >  			      (file-name-as-directory dir))
> >  		      :warning)
> >  		     (throw :safe t))
> > -		   (unless (eql uid (user-uid)) ; is the dir ours?
> > +		   (unless (or (= uid (user-uid)) ; is the dir ours?
> > +			       (and w32
> > +				    ;; Files created on Windows by
> > +				    ;; Administrator (RID=500) have
> > +				    ;; the Administrators (RID=544)
> > +				    ;; group recorded as the owner.
> > +				    (= uid 544) (= (user-uid) 500)))
> >  		     (throw :safe nil))
> >  		   (when w32                    ; on NTFS?
> >  		     (throw :safe t))
> > 
> > 
> 
> I think so. I don't have or don't understand the source code maintenance
> tools

If you have a ported patch.exe, I can tell you the exact command to
invoke it, after you save the patch to a file.

> if I just delete lines 474-477 and add those starting with:
> (unless (or (= uid (user-uid)) ; is the dir ours?
> it should accomplish the same thing.

No.  You should delete the line prefixed with "-" and then add all the
lines prefixed with "+".  Then byte-compile the modified server.el,
restart Emacs, and see if the problem is gone.