X-Git-Url: https://fleuret.org/cgi-bin/gitweb/gitweb.cgi?p=elisp.git;a=blobdiff_plain;f=selector.el;h=419c96fdb53d427efef28501b2deabc7783cec5f;hp=463d81d872bddba737143dfc915631a5f384799c;hb=0785fb27e9d9eeb8d19dd8e1bfad8e520b04bb4c;hpb=76a60245bbaae8a584a5b48cceb550de848ee71e diff --git a/selector.el b/selector.el index 463d81d..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)) + (add-to-history 'file-name-history + (replace-regexp-in-string + abbreviated-home-dir "~/" filename) + ) + ) + (find-file filename)) (defun selector/pick-file (filename)