From 720e512212c76f3954413626ec379a02ae32c408 Mon Sep 17 00:00:00 2001 From: Pierre Courtieu Date: Tue, 1 Mar 2005 17:43:27 +0000 Subject: debugging of holes.el. --- lib/holes.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lib/holes.el b/lib/holes.el index 590c8cc1..b8c5dc03 100644 --- a/lib/holes.el +++ b/lib/holes.el @@ -850,9 +850,10 @@ Must be called when the point is at end of last abbrev expansion." (let ((n (holes-count-newlines-in-last-expand))) (save-excursion (previous-line n) - (while (>= n 0) - (funcall indent-line-function) + (funcall indent-line-function) + (while (> n 0) (next-line 1) + (funcall indent-line-function) (setq n (- n 1)) ) ) -- cgit v1.2.3