From 1ba6c0f23bab738be5c170de306633d9bcdbc379 Mon Sep 17 00:00:00 2001 From: Andreas Schwab Date: Sat, 12 Oct 2002 23:33:06 +0000 Subject: [PATCH] (dired-insert-directory): When looking for existing indentation, goto OPOINT instead of beginning of buffer. --- lisp/ChangeLog | 5 +++++ lisp/dired.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 4fbeade0480..6d69ac5083b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2002-10-13 Andreas Schwab + + * dired.el (dired-insert-directory): When looking for existing + indentation, goto OPOINT instead of beginning of buffer. + 2002-10-12 Michael Kifer * ediff-init.el (ediff-frame-char-height): Use frame-selected-window. diff --git a/lisp/dired.el b/lisp/dired.el index 6aebd08d487..e26447fbd2f 100644 --- a/lisp/dired.el +++ b/lisp/dired.el @@ -701,7 +701,7 @@ If HDR is non-nil, insert a header line with the directory name." ;; If we used --dired and it worked, the lines are already indented. ;; Otherwise, indent them. (unless (save-excursion - (beginning-of-buffer) + (goto-char opoint) (looking-at " ")) (let ((indent-tabs-mode nil)) (indent-rigidly opoint (point) 2))) -- 2.39.2