]> git.eshelyaron.com Git - emacs.git/commitdiff
;; Revert recent change in tramp-cache.el
authorMichael Albinus <michael.albinus@gmx.de>
Sat, 2 May 2020 10:48:55 +0000 (12:48 +0200)
committerMichael Albinus <michael.albinus@gmx.de>
Sat, 2 May 2020 10:48:55 +0000 (12:48 +0200)
* lisp/net/tramp-cache.el (tramp-dump-connection-properties):
Remove compatibility code dumping the persistency file.  Use
`emacs-lisp-mode' for backward compatibility.

lisp/net/tramp-cache.el

index 6d87ce297bc4d0c14d2aef7f3efc5fa6f83bc530..14a64382acbc57a08de8cb1b36d20c31183ce630 100644 (file)
@@ -472,15 +472,10 @@ used to cache connection properties of the local machine."
        ;; Dump it.
        (with-temp-file tramp-persistency-file-name
          (insert
-          ";; -*- lisp-data -*-"
-          ;; `time-stamp-string' might not exist in all Emacs flavors.
-          (condition-case nil
-              (progn
-                (format
-                 " <%s %s>\n"
-                 (time-stamp-string "%02y/%02m/%02d %02H:%02M:%02S")
-                 tramp-persistency-file-name))
-            (error "\n"))
+          ;; Starting with Emacs 28, we could use `lisp-data'.
+          (format ";; -*- emacs-lisp -*- <%s %s>\n"
+                  (time-stamp-string "%02y/%02m/%02d %02H:%02M:%02S")
+                  tramp-persistency-file-name)
           ";; Tramp connection history.  Don't change this file.\n"
           ";; Run `M-x tramp-cleanup-all-connections' instead.\n\n"
           (with-output-to-string