diff options
| author | Richard M. Stallman <rms@gnu.org> | 1999-11-26 23:08:26 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1999-11-26 23:08:26 +0000 |
| commit | d01f35704121de41b33160e0ca4da02d7a300454 (patch) | |
| tree | 86044f3d7f02b85438d0e63ca3ec135b503d84b3 /src/editfns.c | |
| parent | 07c8b450a949c7c30d9610102d4e89b60e9c2f94 (diff) | |
| download | emacs-d01f35704121de41b33160e0ca4da02d7a300454.tar.gz | |
(Fdelete_field): Make it noninteractive. Return nil.
Diffstat (limited to 'src/editfns.c')
| -rw-r--r-- | src/editfns.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/editfns.c b/src/editfns.c index 9cbebbda836..5856e91c859 100644 --- a/src/editfns.c +++ b/src/editfns.c @@ -429,7 +429,7 @@ find_field (pos, merge_at_boundary, beg, end) } } -DEFUN ("delete-field", Fdelete_field, Sdelete_field, 0, 1, "d", +DEFUN ("delete-field", Fdelete_field, Sdelete_field, 0, 1, 0, "Delete the field surrounding POS.\n\ A field is a region of text with the same `field' property.\n\ If POS is nil, the value of point is used for POS.") @@ -440,6 +440,7 @@ If POS is nil, the value of point is used for POS.") find_field (pos, Qnil, &beg, &end); if (beg != end) del_range (beg, end); + return Qnil; } DEFUN ("field-string", Ffield_string, Sfield_string, 0, 1, 0, |