;; update file-name-history after loading a file with the gnuclient
    ;; uses gnuclient(w)
    (eval-after-load "gnuserv"
      '(defadvice server-find-file( after server-find-file-update act )
         (setq file-name-history (cons (ad-get-arg 0) file-name-history))))

    ;; update file-name-history after loading a file with dired
    (eval-after-load "dired"
      '(defadvice dired-find-file( around dired-find-file-history act )
         (let ((file (dired-get-file-for-visit)))
           ad-do-it
           (setq file-name-history (cons file file-name-history)))))

Can you explain the scenario where you would want to use these file
names from the history?  When you're in that buffer, the file name is
available as the default, and can be yanked with M-p.


_______________________________________________
Emacs-pretest-bug mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug

Reply via email to