X-Git-Url: https://www.fleuret.org/cgi-bin/gitweb/gitweb.cgi?p=elisp.git;a=blobdiff_plain;f=selector.el;h=419c96fdb53d427efef28501b2deabc7783cec5f;hp=a48ef7802d08f749e0a0784451e8cc6e545c8de9;hb=a6876d786f18071b9abf0bfc56e6fc313e503e72;hpb=6f9cb9511acc6e80bdce30e078b096008b9d7cf9 diff --git a/selector.el b/selector.el index a48ef78..419c96f 100644 --- a/selector.el +++ b/selector.el @@ -335,7 +335,7 @@ There seems to be header-line refreshing problems with emacs21." (if (file-remote-p s) " " (propertize - (format-time-string "%a %b %e" (elt (file-attributes s) 5)) + (format-time-string "%b %a %e" (elt (file-attributes s) 5)) 'face 'selector/date)) ;; " -- " @@ -352,7 +352,12 @@ There seems to be header-line refreshing problems with emacs21." (defun selector/find-file (filename) (if selector/add-to-file-name-history - (add-to-list 'file-name-history filename t)) + (add-to-history 'file-name-history + (replace-regexp-in-string + abbreviated-home-dir "~/" filename) + ) + ) + (find-file filename)) (defun selector/pick-file (filename)