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 8e1376a391.  (Bug#77816)
This commit is contained in:
Wojciech Siewierski 2025-04-14 18:57:28 +02:00 committed by Eli Zaretskii
parent 74e25c9413
commit 45cf832ac7

View file

@ -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)