diff lisp/files.el @ 8181:a5c67d37141b

(hack-one-local-variable): Check for root using user-uid.
author Richard M. Stallman <rms@gnu.org>
date Fri, 08 Jul 1994 21:26:56 +0000
parents defefddf88db
children 96e6518c209b
line wrap: on
line diff
--- a/lisp/files.el	Fri Jul 08 10:31:16 1994 +0000
+++ b/lisp/files.el	Fri Jul 08 21:26:56 1994 +0000
@@ -1182,7 +1182,7 @@
 		      (memq (nth 1 (nth 2 val))
 			    '(lisp-indent-hook)))
 		 ;; Permit eval if not root and user says ok.
-		 (and (not (string= (user-login-name) "root"))
+		 (and (not (zerop (user-uid)))
 		      (or (eq enable-local-eval t)
 			  (and enable-local-eval
 			       (save-window-excursion