mirror of
https://github.com/masscollaborationlabs/emacs.git
synced 2025-07-04 11:23:24 +00:00
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:
parent
74e25c9413
commit
45cf832ac7
1 changed files with 1 additions and 8 deletions
|
@ -167,14 +167,7 @@
|
||||||
(interactive "p")
|
(interactive "p")
|
||||||
(calc-with-trail-buffer
|
(calc-with-trail-buffer
|
||||||
(let ((buffer-read-only nil))
|
(let ((buffer-read-only nil))
|
||||||
(save-restriction
|
(kill-line n))
|
||||||
(narrow-to-region ; don't delete "Emacs Trail" header
|
|
||||||
(save-excursion
|
|
||||||
(goto-char (point-min))
|
|
||||||
(forward-line 1)
|
|
||||||
(point))
|
|
||||||
(point-max))
|
|
||||||
(kill-line n)))
|
|
||||||
(calc-trail-here)))
|
(calc-trail-here)))
|
||||||
|
|
||||||
(provide 'calc-trail)
|
(provide 'calc-trail)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue