From fc50a3be61dca43ffe9a855b4679a42d91c33ead Mon Sep 17 00:00:00 2001 From: Masatake YAMATO Date: Tue, 25 Oct 2005 12:02:47 +0000 Subject: [PATCH] (dired-virtual): Don't use `dired-insert-headerline'. --- lisp/ChangeLog | 4 ++++ lisp/dired-x.el | 4 +++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d95571394d5..c38eb58672c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2005-10-25 Masatake YAMATO + + * dired-x.el (dired-virtual): Don't use `dired-insert-headerline'. + 2005-10-25 Michael Cadilhac (tiny change) * play/blackbox.el (blackbox-redefine-key): New function. diff --git a/lisp/dired-x.el b/lisp/dired-x.el index 50c52f0ab6b..7c6adbe8448 100644 --- a/lisp/dired-x.el +++ b/lisp/dired-x.el @@ -678,7 +678,9 @@ you can relist single subdirs using \\[dired-do-redisplay]." ;; decent subdir headerline: (goto-char (point-min)) (or (looking-at dired-subdir-regexp) - (dired-insert-headerline default-directory)) + (insert " " + (directory-file-name (file-name-directory default-directory)) + ":\n")) (dired-mode dirname (or switches dired-listing-switches)) (setq mode-name "Virtual Dired" revert-buffer-function 'dired-virtual-revert) -- 2.39.5