X-Git-Url: https://fleuret.org/cgi-bin/gitweb/gitweb.cgi?p=elisp.git;a=blobdiff_plain;f=selector.el;h=419c96fdb53d427efef28501b2deabc7783cec5f;hp=197a8af147a3beccb53194acef12a6aac73d17d5;hb=6c3f9b69ee5f2417199393d35268cf8fc1f969d8;hpb=f5ad24fcd82297711a7684d7a0fb32017477439c

diff --git a/selector.el b/selector.el
index 197a8af..419c96f 100644
--- a/selector.el
+++ b/selector.el
@@ -335,10 +335,12 @@ 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))
 
-   " -- "
+   ;; " -- "
+
+   " "
 
    (if (string-match abbreviated-home-dir s)
        (concat (propertize
@@ -350,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)