diff options
| author | Thien-Thi Nguyen | 2006-07-30 12:43:09 +0000 |
|---|---|---|
| committer | Thien-Thi Nguyen | 2006-07-30 12:43:09 +0000 |
| commit | f554db0f9656259e14ba65667db567d68c16dc3c (patch) | |
| tree | 01f66ac15c2647e91655c644ef117aaec57134ba /src | |
| parent | 0466836353bb20a75293b4f358184f2e264ebba5 (diff) | |
| download | emacs-f554db0f9656259e14ba65667db567d68c16dc3c.tar.gz emacs-f554db0f9656259e14ba65667db567d68c16dc3c.zip | |
Undo 2006-06-28 change.
Diffstat (limited to 'src')
| -rw-r--r-- | src/editfns.c | 25 |
1 files changed, 5 insertions, 20 deletions
diff --git a/src/editfns.c b/src/editfns.c index aea044db068..e692204c702 100644 --- a/src/editfns.c +++ b/src/editfns.c | |||
| @@ -629,10 +629,7 @@ find_field (pos, merge_at_boundary, beg_limit, beg, end_limit, end) | |||
| 629 | DEFUN ("delete-field", Fdelete_field, Sdelete_field, 0, 1, 0, | 629 | DEFUN ("delete-field", Fdelete_field, Sdelete_field, 0, 1, 0, |
| 630 | doc: /* Delete the field surrounding POS. | 630 | doc: /* Delete the field surrounding POS. |
| 631 | A field is a region of text with the same `field' property. | 631 | A field is a region of text with the same `field' property. |
| 632 | If POS is nil, the value of point is used for POS. | 632 | If POS is nil, the value of point is used for POS. */) |
| 633 | |||
| 634 | An `args-out-of-range' error is signaled if POS is outside the | ||
| 635 | buffer's accessible portion. */) | ||
| 636 | (pos) | 633 | (pos) |
| 637 | Lisp_Object pos; | 634 | Lisp_Object pos; |
| 638 | { | 635 | { |
| @@ -646,10 +643,7 @@ buffer's accessible portion. */) | |||
| 646 | DEFUN ("field-string", Ffield_string, Sfield_string, 0, 1, 0, | 643 | DEFUN ("field-string", Ffield_string, Sfield_string, 0, 1, 0, |
| 647 | doc: /* Return the contents of the field surrounding POS as a string. | 644 | doc: /* Return the contents of the field surrounding POS as a string. |
| 648 | A field is a region of text with the same `field' property. | 645 | A field is a region of text with the same `field' property. |
| 649 | If POS is nil, the value of point is used for POS. | 646 | If POS is nil, the value of point is used for POS. */) |
| 650 | |||
| 651 | An `args-out-of-range' error is signaled if POS is outside the | ||
| 652 | buffer's accessible portion. */) | ||
| 653 | (pos) | 647 | (pos) |
| 654 | Lisp_Object pos; | 648 | Lisp_Object pos; |
| 655 | { | 649 | { |
| @@ -661,10 +655,7 @@ buffer's accessible portion. */) | |||
| 661 | DEFUN ("field-string-no-properties", Ffield_string_no_properties, Sfield_string_no_properties, 0, 1, 0, | 655 | DEFUN ("field-string-no-properties", Ffield_string_no_properties, Sfield_string_no_properties, 0, 1, 0, |
| 662 | doc: /* Return the contents of the field around POS, without text-properties. | 656 | doc: /* Return the contents of the field around POS, without text-properties. |
| 663 | A field is a region of text with the same `field' property. | 657 | A field is a region of text with the same `field' property. |
| 664 | If POS is nil, the value of point is used for POS. | 658 | If POS is nil, the value of point is used for POS. */) |
| 665 | |||
| 666 | An `args-out-of-range' error is signaled if POS is outside the | ||
| 667 | buffer's accessible portion. */) | ||
| 668 | (pos) | 659 | (pos) |
| 669 | Lisp_Object pos; | 660 | Lisp_Object pos; |
| 670 | { | 661 | { |
| @@ -680,10 +671,7 @@ If POS is nil, the value of point is used for POS. | |||
| 680 | If ESCAPE-FROM-EDGE is non-nil and POS is at the beginning of its | 671 | If ESCAPE-FROM-EDGE is non-nil and POS is at the beginning of its |
| 681 | field, then the beginning of the *previous* field is returned. | 672 | field, then the beginning of the *previous* field is returned. |
| 682 | If LIMIT is non-nil, it is a buffer position; if the beginning of the field | 673 | If LIMIT is non-nil, it is a buffer position; if the beginning of the field |
| 683 | is before LIMIT, then LIMIT will be returned instead. | 674 | is before LIMIT, then LIMIT will be returned instead. */) |
| 684 | |||
| 685 | An `args-out-of-range' error is signaled if POS is outside the | ||
| 686 | buffer's accessible portion. */) | ||
| 687 | (pos, escape_from_edge, limit) | 675 | (pos, escape_from_edge, limit) |
| 688 | Lisp_Object pos, escape_from_edge, limit; | 676 | Lisp_Object pos, escape_from_edge, limit; |
| 689 | { | 677 | { |
| @@ -699,10 +687,7 @@ If POS is nil, the value of point is used for POS. | |||
| 699 | If ESCAPE-FROM-EDGE is non-nil and POS is at the end of its field, | 687 | If ESCAPE-FROM-EDGE is non-nil and POS is at the end of its field, |
| 700 | then the end of the *following* field is returned. | 688 | then the end of the *following* field is returned. |
| 701 | If LIMIT is non-nil, it is a buffer position; if the end of the field | 689 | If LIMIT is non-nil, it is a buffer position; if the end of the field |
| 702 | is after LIMIT, then LIMIT will be returned instead. | 690 | is after LIMIT, then LIMIT will be returned instead. */) |
| 703 | |||
| 704 | An `args-out-of-range' error is signaled if POS is outside the | ||
| 705 | buffer's accessible portion. */) | ||
| 706 | (pos, escape_from_edge, limit) | 691 | (pos, escape_from_edge, limit) |
| 707 | Lisp_Object pos, escape_from_edge, limit; | 692 | Lisp_Object pos, escape_from_edge, limit; |
| 708 | { | 693 | { |