diff options
| -rw-r--r-- | lisp/net/tramp-smb.el | 10 |
1 files 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)." | |||
| 1814 | (if (and sec min hour day month year) | 1814 | (if (and sec min hour day month year) |
| 1815 | (encode-time | 1815 | (encode-time |
| 1816 | sec min hour day | 1816 | sec min hour day |
| 1817 | ;; FIXME: Won't this fail if parse-time-months is configured | 1817 | ;; `parse-time-months' could be customized by the |
| 1818 | ;; by the user? See "The date/time prompt" in the Org manual. | 1818 | ;; user, so we take its default value. |
| 1819 | ;; If the code is OK as-is, perhaps explain why in a comment. | 1819 | (cdr |
| 1820 | (cdr (assoc (downcase month) parse-time-months)) | 1820 | (assoc |
| 1821 | (downcase month) | ||
| 1822 | (default-toplevel-value 'parse-time-months))) | ||
| 1821 | year) | 1823 | year) |
| 1822 | tramp-time-dont-know)) | 1824 | tramp-time-dont-know)) |
| 1823 | (list localname mode size mtime)))) | 1825 | (list localname mode size mtime)))) |