From 3e943ebc34d3583480546da24ecb65ca74119297 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Fri, 2 Aug 2019 20:14:23 +0200 Subject: [PATCH] Use default value of `parse-time-months' in tramp-smb.el * lisp/net/tramp-smb.el (tramp-smb-read-file-entry): Use default value of `parse-time-months'. --- lisp/net/tramp-smb.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/lisp/net/tramp-smb.el b/lisp/net/tramp-smb.el index 568c6cb43aa..cb8d2df0847 100644 --- a/lisp/net/tramp-smb.el +++ b/lisp/net/tramp-smb.el @@ -1814,10 +1814,12 @@ Result is the list (LOCALNAME MODE SIZE MTIME)." (if (and sec min hour day month year) (encode-time sec min hour day - ;; FIXME: Won't this fail if parse-time-months is configured - ;; by the user? See "The date/time prompt" in the Org manual. - ;; If the code is OK as-is, perhaps explain why in a comment. - (cdr (assoc (downcase month) parse-time-months)) + ;; `parse-time-months' could be customized by the + ;; user, so we take its default value. + (cdr + (assoc + (downcase month) + (default-toplevel-value 'parse-time-months))) year) tramp-time-dont-know)) (list localname mode size mtime)))) -- 2.39.2