diff options
| author | Po Lu | 2023-05-13 08:53:57 +0800 |
|---|---|---|
| committer | Po Lu | 2023-05-13 08:53:57 +0800 |
| commit | 67db3bfdc27a5db27ffbe346387f604cf21182b7 (patch) | |
| tree | 6fc25b97be0d2d900ccb7bee1ccf86f6a7d15735 /src | |
| parent | 7ac8bcaacc1f3dbbda3febe09dde6d18a2d69729 (diff) | |
| parent | 3e132b972e30c5b0cb75ed29d8ca5a845434d6fe (diff) | |
| download | emacs-67db3bfdc27a5db27ffbe346387f604cf21182b7.tar.gz emacs-67db3bfdc27a5db27ffbe346387f604cf21182b7.zip | |
Merge remote-tracking branch 'origin/master' into feature/android
Diffstat (limited to 'src')
| -rw-r--r-- | src/fns.c | 11 | ||||
| -rw-r--r-- | src/haikufont.c | 1 |
2 files changed, 10 insertions, 2 deletions
| @@ -26,6 +26,7 @@ along with GNU Emacs. If not, see <https://www.gnu.org/licenses/>. */ | |||
| 26 | #include <intprops.h> | 26 | #include <intprops.h> |
| 27 | #include <vla.h> | 27 | #include <vla.h> |
| 28 | #include <errno.h> | 28 | #include <errno.h> |
| 29 | #include <ctype.h> | ||
| 29 | 30 | ||
| 30 | #include "lisp.h" | 31 | #include "lisp.h" |
| 31 | #include "bignum.h" | 32 | #include "bignum.h" |
| @@ -3202,7 +3203,9 @@ DEFUN ("yes-or-no-p", Fyes_or_no_p, Syes_or_no_p, 1, 1, 0, | |||
| 3202 | Return t if answer is yes, and nil if the answer is no. | 3203 | Return t if answer is yes, and nil if the answer is no. |
| 3203 | 3204 | ||
| 3204 | PROMPT is the string to display to ask the question; `yes-or-no-p' | 3205 | PROMPT is the string to display to ask the question; `yes-or-no-p' |
| 3205 | appends `yes-or-no-prompt' (default \"(yes or no) \") to it. | 3206 | appends `yes-or-no-prompt' (default \"(yes or no) \") to it. If |
| 3207 | PROMPT is a non-empty string, and it ends with a non-space character, | ||
| 3208 | a space character will be appended to it. | ||
| 3206 | 3209 | ||
| 3207 | The user must confirm the answer with RET, and can edit it until it | 3210 | The user must confirm the answer with RET, and can edit it until it |
| 3208 | has been confirmed. | 3211 | has been confirmed. |
| @@ -3234,6 +3237,12 @@ if `last-nonmenu-event' is nil, and `use-dialog-box' is non-nil. */) | |||
| 3234 | if (use_short_answers) | 3237 | if (use_short_answers) |
| 3235 | return call1 (intern ("y-or-n-p"), prompt); | 3238 | return call1 (intern ("y-or-n-p"), prompt); |
| 3236 | 3239 | ||
| 3240 | { | ||
| 3241 | char *s = SSDATA (prompt); | ||
| 3242 | ptrdiff_t len = strlen (s); | ||
| 3243 | if ((len > 0) && !isspace (s[len - 1])) | ||
| 3244 | prompt = CALLN (Fconcat, prompt, build_string (" ")); | ||
| 3245 | } | ||
| 3237 | prompt = CALLN (Fconcat, prompt, Vyes_or_no_prompt); | 3246 | prompt = CALLN (Fconcat, prompt, Vyes_or_no_prompt); |
| 3238 | 3247 | ||
| 3239 | specpdl_ref count = SPECPDL_INDEX (); | 3248 | specpdl_ref count = SPECPDL_INDEX (); |
diff --git a/src/haikufont.c b/src/haikufont.c index b4c2e547247..b6a9cb34c4d 100644 --- a/src/haikufont.c +++ b/src/haikufont.c | |||
| @@ -1127,7 +1127,6 @@ haikufont_draw (struct glyph_string *s, int from, int to, | |||
| 1127 | 1127 | ||
| 1128 | haiku_draw_background_rect (s, s->face, x, y - ascent, | 1128 | haiku_draw_background_rect (s, s->face, x, y - ascent, |
| 1129 | s->width, height); | 1129 | s->width, height); |
| 1130 | s->background_filled_p = 1; | ||
| 1131 | } | 1130 | } |
| 1132 | 1131 | ||
| 1133 | BView_SetHighColor (view, foreground); | 1132 | BView_SetHighColor (view, foreground); |