aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAndreas Schwab2002-10-12 23:33:06 +0000
committerAndreas Schwab2002-10-12 23:33:06 +0000
commit1ba6c0f23bab738be5c170de306633d9bcdbc379 (patch)
tree4c32e2e13f2687f0516723a01ee189e6d30ae34b
parent4a9f0faea66f0bf6f6523c00041da84e0ba43531 (diff)
downloademacs-1ba6c0f23bab738be5c170de306633d9bcdbc379.tar.gz
emacs-1ba6c0f23bab738be5c170de306633d9bcdbc379.zip
(dired-insert-directory): When looking for existing
indentation, goto OPOINT instead of beginning of buffer.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/dired.el2
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4fbeade0480..6d69ac5083b 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12002-10-13 Andreas Schwab <schwab@suse.de>
2
3 * dired.el (dired-insert-directory): When looking for existing
4 indentation, goto OPOINT instead of beginning of buffer.
5
12002-10-12 Michael Kifer <kifer@cs.stonybrook.edu> 62002-10-12 Michael Kifer <kifer@cs.stonybrook.edu>
2 7
3 * ediff-init.el (ediff-frame-char-height): Use frame-selected-window. 8 * 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."
701 ;; If we used --dired and it worked, the lines are already indented. 701 ;; If we used --dired and it worked, the lines are already indented.
702 ;; Otherwise, indent them. 702 ;; Otherwise, indent them.
703 (unless (save-excursion 703 (unless (save-excursion
704 (beginning-of-buffer) 704 (goto-char opoint)
705 (looking-at " ")) 705 (looking-at " "))
706 (let ((indent-tabs-mode nil)) 706 (let ((indent-tabs-mode nil))
707 (indent-rigidly opoint (point) 2))) 707 (indent-rigidly opoint (point) 2)))