diff options
| author | Lars Ingebrigtsen | 2014-02-07 22:28:12 -0800 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2014-02-07 22:28:12 -0800 |
| commit | 6ef4f3cef2627334fa2f7fda02099b4b19452998 (patch) | |
| tree | 11c038689ed34b562f5df2db56d3d6693ecb5e6b | |
| parent | 574e477fb64ab8b6ca12bbd522210e5ac8d13eeb (diff) | |
| download | emacs-6ef4f3cef2627334fa2f7fda02099b4b19452998.tar.gz emacs-6ef4f3cef2627334fa2f7fda02099b4b19452998.zip | |
* simple.el (line-move): Document utility function used many
places in the Emacs sources.
Fixes: debbugs:14843
| -rw-r--r-- | lisp/ChangeLog | 3 | ||||
| -rw-r--r-- | lisp/simple.el | 8 |
2 files changed, 11 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 4b65d0b4ee2..99255517a57 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,8 @@ | |||
| 1 | 2014-02-08 Lars Ingebrigtsen <larsi@gnus.org> | 1 | 2014-02-08 Lars Ingebrigtsen <larsi@gnus.org> |
| 2 | 2 | ||
| 3 | * simple.el (line-move): Document utility function used many | ||
| 4 | places in the Emacs sources (bug#14843). | ||
| 5 | |||
| 3 | * dired.el (dired-mode-map): Make :help text more accurate (bug#14893). | 6 | * dired.el (dired-mode-map): Make :help text more accurate (bug#14893). |
| 4 | (dired-prev-marked-file): Doc fix (bug#14855). | 7 | (dired-prev-marked-file): Doc fix (bug#14855). |
| 5 | (dired-up-directory): Doc fix (bug#14848). | 8 | (dired-up-directory): Doc fix (bug#14848). |
diff --git a/lisp/simple.el b/lisp/simple.el index 124e04fd0c0..497e69f813d 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -5113,6 +5113,12 @@ The value is a floating-point number." | |||
| 5113 | ;; a cleaner solution to the problem of making C-n do something | 5113 | ;; a cleaner solution to the problem of making C-n do something |
| 5114 | ;; useful given a tall image. | 5114 | ;; useful given a tall image. |
| 5115 | (defun line-move (arg &optional noerror to-end try-vscroll) | 5115 | (defun line-move (arg &optional noerror to-end try-vscroll) |
| 5116 | "Move forward ARG lines. | ||
| 5117 | If NOERROR, don't signal an error if we can't move ARG lines. | ||
| 5118 | TO-END is unused. | ||
| 5119 | TRY-VSCROLL controls whether to vscroll tall lines: if either | ||
| 5120 | `auto-window-vscroll' or TRY-VSCROLL is nil, this function will | ||
| 5121 | not vscroll." | ||
| 5116 | (if noninteractive | 5122 | (if noninteractive |
| 5117 | (forward-line arg) | 5123 | (forward-line arg) |
| 5118 | (unless (and auto-window-vscroll try-vscroll | 5124 | (unless (and auto-window-vscroll try-vscroll |
| @@ -5162,6 +5168,8 @@ The value is a floating-point number." | |||
| 5162 | ;; Arg says how many lines to move. The value is t if we can move the | 5168 | ;; Arg says how many lines to move. The value is t if we can move the |
| 5163 | ;; specified number of lines. | 5169 | ;; specified number of lines. |
| 5164 | (defun line-move-visual (arg &optional noerror) | 5170 | (defun line-move-visual (arg &optional noerror) |
| 5171 | "Move ARG lines forward. | ||
| 5172 | If NOERROR, don't signal an error if we can't move that many lines." | ||
| 5165 | (let ((opoint (point)) | 5173 | (let ((opoint (point)) |
| 5166 | (hscroll (window-hscroll)) | 5174 | (hscroll (window-hscroll)) |
| 5167 | target-hscroll) | 5175 | target-hscroll) |