emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Patch] url-cookie-write-file saves versioned backups


From: Diane Murray
Subject: [Patch] url-cookie-write-file saves versioned backups
Date: Mon, 28 Aug 2006 01:53:45 +0200

Versioned backups of the cookies file are being saved (contrary to the
intent of the last changes made to url-cookie.el in revision 1.18),
which causes `backup-buffer' to ask for confirmation to delete those
excess backup files.  Additionally, the error "Local variables list is
not properly terminated" occurs when opening the cookies file.  The
following patch corrects this.

I submitted earlier patches using the email <address@hidden>, if for
some reason that needs to be known.


        * url-cookie.el (url-cookie-write-file): Insert a newline
        character before the Local Variables line.  Set `version-control'
        to never.


*** url-cookie.el       13 Jul 2006 03:53:15 +0200      1.18
--- url-cookie.el       27 Aug 2006 15:25:21 +0200      
***************
*** 168,178 ****
        (insert ")\n(setq url-cookie-secure-storage\n '")
        (pp url-cookie-secure-storage (current-buffer))
        (insert ")\n")
!       (insert ";; Local Variables:\n"
                ";; version-control: never\n"
                ";; no-byte-compile: t\n"
                ";; End:\n")
!       (set (make-local-variable 'version-control) t)
        (write-file fname)
        (setq url-cookies-changed-since-last-save nil)
        (kill-buffer (current-buffer))))))
--- 168,178 ----
        (insert ")\n(setq url-cookie-secure-storage\n '")
        (pp url-cookie-secure-storage (current-buffer))
        (insert ")\n")
!       (insert "\n;; Local Variables:\n"
                ";; version-control: never\n"
                ";; no-byte-compile: t\n"
                ";; End:\n")
!       (set (make-local-variable 'version-control) 'never)
        (write-file fname)
        (setq url-cookies-changed-since-last-save nil)
        (kill-buffer (current-buffer))))))




reply via email to

[Prev in Thread] Current Thread [Next in Thread]