Mercurial > emacs
comparison lisp/comint.el @ 45898:5d6de4aa3f61
(comint-next-prompt, comint-previous-prompt): Fix typos.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Tue, 18 Jun 2002 14:36:07 +0000 |
| parents | 875b299f29c6 |
| children | e8271a03c1eb |
comparison
equal
deleted
inserted
replaced
| 45897:19b72b42b514 | 45898:5d6de4aa3f61 |
|---|---|
| 2177 | 2177 |
| 2178 (defun comint-next-prompt (n) | 2178 (defun comint-next-prompt (n) |
| 2179 "Move to end of Nth next prompt in the buffer. | 2179 "Move to end of Nth next prompt in the buffer. |
| 2180 If `comint-use-prompt-regexp-instead-of-fields' is nil, then this means | 2180 If `comint-use-prompt-regexp-instead-of-fields' is nil, then this means |
| 2181 the beginning of the Nth next `input' field, otherwise, it means the Nth | 2181 the beginning of the Nth next `input' field, otherwise, it means the Nth |
| 2182 occurance of text matching `comint-prompt-regexp'." | 2182 occurrence of text matching `comint-prompt-regexp'." |
| 2183 (interactive "p") | 2183 (interactive "p") |
| 2184 (if comint-use-prompt-regexp-instead-of-fields | 2184 (if comint-use-prompt-regexp-instead-of-fields |
| 2185 ;; Use comint-prompt-regexp | 2185 ;; Use comint-prompt-regexp |
| 2186 (let ((paragraph-start comint-prompt-regexp)) | 2186 (let ((paragraph-start comint-prompt-regexp)) |
| 2187 (end-of-line (if (> n 0) 1 0)) | 2187 (end-of-line (if (> n 0) 1 0)) |
| 2214 | 2214 |
| 2215 (defun comint-previous-prompt (n) | 2215 (defun comint-previous-prompt (n) |
| 2216 "Move to end of Nth previous prompt in the buffer. | 2216 "Move to end of Nth previous prompt in the buffer. |
| 2217 If `comint-use-prompt-regexp-instead-of-fields' is nil, then this means | 2217 If `comint-use-prompt-regexp-instead-of-fields' is nil, then this means |
| 2218 the beginning of the Nth previous `input' field, otherwise, it means the Nth | 2218 the beginning of the Nth previous `input' field, otherwise, it means the Nth |
| 2219 occurance of text matching `comint-prompt-regexp'." | 2219 occurrence of text matching `comint-prompt-regexp'." |
| 2220 (interactive "p") | 2220 (interactive "p") |
| 2221 (comint-next-prompt (- n))) | 2221 (comint-next-prompt (- n))) |
| 2222 | 2222 |
| 2223 ;; State used by `comint-insert-previous-argument' when cycling. | 2223 ;; State used by `comint-insert-previous-argument' when cycling. |
| 2224 (defvar comint-insert-previous-argument-last-start-pos nil) | 2224 (defvar comint-insert-previous-argument-last-start-pos nil) |