Mercurial > emacs
comparison lisp/simple.el @ 64598:e139156061a7
(line-move-1): Fix comments.
| author | Juri Linkov <juri@jurta.org> |
|---|---|
| date | Fri, 22 Jul 2005 18:43:24 +0000 |
| parents | cff17c5abe4d |
| children | 9c89284fc434 890cc78a5a24 |
comparison
equal
deleted
inserted
replaced
| 64597:79fcb8ba32de | 64598:e139156061a7 |
|---|---|
| 3489 (cond ((> arg 0) | 3489 (cond ((> arg 0) |
| 3490 ;; If we did not move down as far as desired, | 3490 ;; If we did not move down as far as desired, |
| 3491 ;; at least go to end of line. | 3491 ;; at least go to end of line. |
| 3492 (end-of-line)) | 3492 (end-of-line)) |
| 3493 ((< arg 0) | 3493 ((< arg 0) |
| 3494 ;; If we did not move down as far as desired, | 3494 ;; If we did not move up as far as desired, |
| 3495 ;; at least go to end of line. | 3495 ;; at least go to beginning of line. |
| 3496 (beginning-of-line)) | 3496 (beginning-of-line)) |
| 3497 (t | 3497 (t |
| 3498 (line-move-finish (or goal-column temporary-goal-column) | 3498 (line-move-finish (or goal-column temporary-goal-column) |
| 3499 opoint forward)))))) | 3499 opoint forward)))))) |
| 3500 | 3500 |