mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

(tpu-delete-to-eol): Fix typo.

Browse Source 
(tpu-delete-to-bol): Likewise.
This commit is contained in:
Juanma Barranquero 2002-07-03 14:32:01 +00:00
parent e6608c1233
commit 5ec2752af6
2 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/ChangeLog
View File

@ -12,6 +12,9 @@
* allout.el (outline-goto-prefix): Likewise.
* emulation/tpu-edt.el (tpu-delete-to-eol): Likewise.
(tpu-delete-to-bol): Likewise.
* subr.el (chars-in-region): Add obsolescence declaration for
`chars-in-region'.

4
lisp/emulation/tpu-edt.el
View File

@ -1418,7 +1418,7 @@ They are saved for the TPU-edt undelete-lines command."
(defun tpu-delete-to-eol (num)
"Delete text up to end of line.
With argument, delete up to to Nth line-end past point.
With argument, delete up to the Nth line-end past point.
They are saved for the TPU-edt undelete-lines command."
(interactive "p")
(let ((beg (point)))
@ -1430,7 +1430,7 @@ They are saved for the TPU-edt undelete-lines command."
(defun tpu-delete-to-bol (num)
"Delete text back to beginning of line.
With argument, delete up to to Nth line-end past point.
With argument, delete up to the Nth line-end past point.
They are saved for the TPU-edt undelete-lines command."
(interactive "p")
(let ((beg (point)))