Mercurial > hg > xemacs-beta
comparison lisp/paragraphs.el @ 211:78478c60bfcd r20-4b4
Import from CVS: tag r20-4b4
| author | cvs |
|---|---|
| date | Mon, 13 Aug 2007 10:05:51 +0200 |
| parents | 41ff10fd062f |
| children | 1f0dabaa0855 |
comparison
equal
deleted
inserted
replaced
| 210:49f55ca3ba57 | 211:78478c60bfcd |
|---|---|
| 344 ; (forward-sentence arg) | 344 ; (forward-sentence arg) |
| 345 ; (point)) | 345 ; (point)) |
| 346 ; nil t)) | 346 ; nil t)) |
| 347 (mark-something 'mark-end-of-sentence 'forward-sentence arg)) | 347 (mark-something 'mark-end-of-sentence 'forward-sentence arg)) |
| 348 | 348 |
| 349 (defun mark-end-of-line (arg) | |
| 350 "Put mark at end of line. Arg works as in `end-of-line'." | |
| 351 (interactive "p") | |
| 352 (mark-something 'mark-end-of-line 'end-of-line arg)) | |
| 353 | |
| 354 | |
| 349 (defun transpose-sentences (arg) | 355 (defun transpose-sentences (arg) |
| 350 "Interchange this (next) and previous sentence." | 356 "Interchange this (next) and previous sentence." |
| 351 (interactive "*p") | 357 (interactive "*p") |
| 352 (transpose-subr 'forward-sentence arg)) | 358 (transpose-subr 'forward-sentence arg)) |
| 353 | 359 |