From 45cf832ac75f8d6fb41a4856d1987062e81dcddb Mon Sep 17 00:00:00 2001 From: Wojciech Siewierski Date: Mon, 14 Apr 2025 18:57:28 +0200 Subject: [PATCH] Fix deleting the first line of calc trail * lisp/calc/calc-trail.el (calc-trail-kill): Remove the check preventing the removal of the first trail line, which is no longer relevant since commit 8e1376a3912. (Bug#77816) --- lisp/calc/calc-trail.el | 9 +-------- 1 file changed, 1 insertion(+), 8 deletions(-) diff --git a/lisp/calc/calc-trail.el b/lisp/calc/calc-trail.el index f134a7b16b9..433d3983b12 100644 --- a/lisp/calc/calc-trail.el +++ b/lisp/calc/calc-trail.el @@ -167,14 +167,7 @@ (interactive "p") (calc-with-trail-buffer (let ((buffer-read-only nil)) - (save-restriction - (narrow-to-region ; don't delete "Emacs Trail" header - (save-excursion - (goto-char (point-min)) - (forward-line 1) - (point)) - (point-max)) - (kill-line n))) + (kill-line n)) (calc-trail-here))) (provide 'calc-trail)