diff options
Diffstat (limited to 'src/editfns.c')
| -rw-r--r-- | src/editfns.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/editfns.c b/src/editfns.c index 831edb4c171..12e5ca8c001 100644 --- a/src/editfns.c +++ b/src/editfns.c | |||
| @@ -1,4 +1,4 @@ | |||
| 1 | /* Lisp functions pertaining to editing. | 1 | /* Lisp functions pertaining to editing. -*- coding: utf-8 -*- |
| 2 | 2 | ||
| 3 | Copyright (C) 1985-1987, 1989, 1993-2015 Free Software Foundation, Inc. | 3 | Copyright (C) 1985-1987, 1989, 1993-2015 Free Software Foundation, Inc. |
| 4 | 4 | ||
| @@ -3627,7 +3627,7 @@ save_restriction_restore (Lisp_Object data) | |||
| 3627 | DEFUN ("save-restriction", Fsave_restriction, Ssave_restriction, 0, UNEVALLED, 0, | 3627 | DEFUN ("save-restriction", Fsave_restriction, Ssave_restriction, 0, UNEVALLED, 0, |
| 3628 | doc: /* Execute BODY, saving and restoring current buffer's restrictions. | 3628 | doc: /* Execute BODY, saving and restoring current buffer's restrictions. |
| 3629 | The buffer's restrictions make parts of the beginning and end invisible. | 3629 | The buffer's restrictions make parts of the beginning and end invisible. |
| 3630 | \(They are set up with `narrow-to-region' and eliminated with `widen'.) | 3630 | (They are set up with `narrow-to-region' and eliminated with `widen'.) |
| 3631 | This special form, `save-restriction', saves the current buffer's restrictions | 3631 | This special form, `save-restriction', saves the current buffer's restrictions |
| 3632 | when it is entered, and restores them when it is exited. | 3632 | when it is entered, and restores them when it is exited. |
| 3633 | So any `narrow-to-region' within BODY lasts only until the end of the form. | 3633 | So any `narrow-to-region' within BODY lasts only until the end of the form. |
| @@ -4154,7 +4154,7 @@ styled_format (ptrdiff_t nargs, Lisp_Object *args, bool message) | |||
| 4154 | || conversion == 'X')) | 4154 | || conversion == 'X')) |
| 4155 | error ("Invalid format operation %%%c", | 4155 | error ("Invalid format operation %%%c", |
| 4156 | STRING_CHAR ((unsigned char *) format - 1)); | 4156 | STRING_CHAR ((unsigned char *) format - 1)); |
| 4157 | else if (! (INTEGERP (args[n]) || FLOATP (args[n]))) | 4157 | else if (! NUMBERP (args[n])) |
| 4158 | error ("Format specifier doesn't match argument type"); | 4158 | error ("Format specifier doesn't match argument type"); |
| 4159 | else | 4159 | else |
| 4160 | { | 4160 | { |