diff options
| author | Stefan Monnier | 2006-08-29 14:00:27 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2006-08-29 14:00:27 +0000 |
| commit | 7660c02fc5da28ad51995a65231aadcd9b7549e7 (patch) | |
| tree | 8d623ff078eb8d2aa6c4f44eef99550896d700d0 | |
| parent | 3775cb5cd8807c9f8781e89dbe0afcfc80f3bcac (diff) | |
| download | emacs-7660c02fc5da28ad51995a65231aadcd9b7549e7.tar.gz emacs-7660c02fc5da28ad51995a65231aadcd9b7549e7.zip | |
(url-cookie-write-file): Really don't use versioned backups.
| -rw-r--r-- | lisp/url/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/url/url-cookie.el | 4 |
2 files changed, 6 insertions, 2 deletions
diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog index e4b54f9fc92..135fdec0921 100644 --- a/lisp/url/ChangeLog +++ b/lisp/url/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2006-08-29 Diane Murray <disumu@x3y2z1.net> (tiny change) | ||
| 2 | |||
| 3 | * url-cookie.el (url-cookie-write-file): Really don't use versioned backups. | ||
| 4 | |||
| 1 | 2006-08-25 Stefan Monnier <monnier@iro.umontreal.ca> | 5 | 2006-08-25 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 6 | ||
| 3 | * url-handlers.el (url-file-local-copy): Tell url-copy-file that the | 7 | * url-handlers.el (url-file-local-copy): Tell url-copy-file that the |
diff --git a/lisp/url/url-cookie.el b/lisp/url/url-cookie.el index e74d4989117..f3902619c89 100644 --- a/lisp/url/url-cookie.el +++ b/lisp/url/url-cookie.el | |||
| @@ -168,11 +168,11 @@ telling Microsoft that." | |||
| 168 | (insert ")\n(setq url-cookie-secure-storage\n '") | 168 | (insert ")\n(setq url-cookie-secure-storage\n '") |
| 169 | (pp url-cookie-secure-storage (current-buffer)) | 169 | (pp url-cookie-secure-storage (current-buffer)) |
| 170 | (insert ")\n") | 170 | (insert ")\n") |
| 171 | (insert ";; Local Variables:\n" | 171 | (insert "\n;; Local Variables:\n" |
| 172 | ";; version-control: never\n" | 172 | ";; version-control: never\n" |
| 173 | ";; no-byte-compile: t\n" | 173 | ";; no-byte-compile: t\n" |
| 174 | ";; End:\n") | 174 | ";; End:\n") |
| 175 | (set (make-local-variable 'version-control) t) | 175 | (set (make-local-variable 'version-control) 'never) |
| 176 | (write-file fname) | 176 | (write-file fname) |
| 177 | (setq url-cookies-changed-since-last-save nil) | 177 | (setq url-cookies-changed-since-last-save nil) |
| 178 | (kill-buffer (current-buffer)))))) | 178 | (kill-buffer (current-buffer)))))) |