Commit f554db0f authored by Thien-Thi Nguyen's avatar Thien-Thi Nguyen

Undo 2006-06-28 change.

parent 04668363
......@@ -629,10 +629,7 @@ find_field (pos, merge_at_boundary, beg_limit, beg, end_limit, end)
DEFUN ("delete-field", Fdelete_field, Sdelete_field, 0, 1, 0,
doc: /* Delete the field surrounding POS.
A field is a region of text with the same `field' property.
If POS is nil, the value of point is used for POS.
An `args-out-of-range' error is signaled if POS is outside the
buffer's accessible portion. */)
If POS is nil, the value of point is used for POS. */)
(pos)
Lisp_Object pos;
{
......@@ -646,10 +643,7 @@ buffer's accessible portion. */)
DEFUN ("field-string", Ffield_string, Sfield_string, 0, 1, 0,
doc: /* Return the contents of the field surrounding POS as a string.
A field is a region of text with the same `field' property.
If POS is nil, the value of point is used for POS.
An `args-out-of-range' error is signaled if POS is outside the
buffer's accessible portion. */)
If POS is nil, the value of point is used for POS. */)
(pos)
Lisp_Object pos;
{
......@@ -661,10 +655,7 @@ buffer's accessible portion. */)
DEFUN ("field-string-no-properties", Ffield_string_no_properties, Sfield_string_no_properties, 0, 1, 0,
doc: /* Return the contents of the field around POS, without text-properties.
A field is a region of text with the same `field' property.
If POS is nil, the value of point is used for POS.
An `args-out-of-range' error is signaled if POS is outside the
buffer's accessible portion. */)
If POS is nil, the value of point is used for POS. */)
(pos)
Lisp_Object pos;
{
......@@ -680,10 +671,7 @@ If POS is nil, the value of point is used for POS.
If ESCAPE-FROM-EDGE is non-nil and POS is at the beginning of its
field, then the beginning of the *previous* field is returned.
If LIMIT is non-nil, it is a buffer position; if the beginning of the field
is before LIMIT, then LIMIT will be returned instead.
An `args-out-of-range' error is signaled if POS is outside the
buffer's accessible portion. */)
is before LIMIT, then LIMIT will be returned instead. */)
(pos, escape_from_edge, limit)
Lisp_Object pos, escape_from_edge, limit;
{
......@@ -699,10 +687,7 @@ If POS is nil, the value of point is used for POS.
If ESCAPE-FROM-EDGE is non-nil and POS is at the end of its field,
then the end of the *following* field is returned.
If LIMIT is non-nil, it is a buffer position; if the end of the field
is after LIMIT, then LIMIT will be returned instead.
An `args-out-of-range' error is signaled if POS is outside the
buffer's accessible portion. */)
is after LIMIT, then LIMIT will be returned instead. */)
(pos, escape_from_edge, limit)
Lisp_Object pos, escape_from_edge, limit;
{
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment