Clean up last commit slightly.
authorLars Magne Ingebrigtsen <larsi@tmp-office.(none)>
Wed, 17 Aug 2011 20:58:11 +0000 (22:58 +0200)
committerLars Magne Ingebrigtsen <larsi@tmp-office.(none)>
Wed, 17 Aug 2011 20:58:11 +0000 (22:58 +0200)
lisp/auth-source.el

index e39cd89..7ac0d29 100644 (file)
@@ -1387,7 +1387,8 @@ Respects `auth-source-save-behavior'.  Uses
                 (insert "\n"))
               (insert add "\n")
               (write-region (point-min) (point-max) file nil 'silent)
-             (set-file-modes file #o0600)
+             ;; Make the .authinfo file non-world-readable.
+             (set-file-modes file #o600)
               (auth-source-do-debug
                "auth-source-netrc-create: wrote 1 new line to %s"
                file)