diff options
| author | Richard M. Stallman | 1993-05-30 04:48:18 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-05-30 04:48:18 +0000 |
| commit | 739f2f5336420c4a5c2623ec90e6117b144f7d42 (patch) | |
| tree | a58f1deb9abef51a5eb05c7e04d4d6aef4b7d5c3 /src | |
| parent | 4a785b6e9638c390b6c221a205c879620181e952 (diff) | |
| download | emacs-739f2f5336420c4a5c2623ec90e6117b144f7d42.tar.gz emacs-739f2f5336420c4a5c2623ec90e6117b144f7d42.zip | |
(Fx_close_current_connection): Clear x_current_display.
(Fx_list_fonts): Use CHECK_LIVE_FRAME on the frame arg.
(x_figure_window_size): Never set PPosition or PSize.
Diffstat (limited to 'src')
| -rw-r--r-- | src/xfns.c | 16 |
1 files changed, 11 insertions, 5 deletions
diff --git a/src/xfns.c b/src/xfns.c index 95932dbe345..4ff2e1ab5c8 100644 --- a/src/xfns.c +++ b/src/xfns.c | |||
| @@ -1415,10 +1415,10 @@ x_figure_window_size (f, parms) | |||
| 1415 | else if (! EQ (tem0, Qunbound) || ! EQ (tem1, Qunbound)) | 1415 | else if (! EQ (tem0, Qunbound) || ! EQ (tem1, Qunbound)) |
| 1416 | error ("Must specify *both* height and width"); | 1416 | error ("Must specify *both* height and width"); |
| 1417 | 1417 | ||
| 1418 | f->display.x->vertical_scroll_bar_extra = | 1418 | f->display.x->vertical_scroll_bar_extra |
| 1419 | (FRAME_HAS_VERTICAL_SCROLL_BARS (f) | 1419 | = (FRAME_HAS_VERTICAL_SCROLL_BARS (f) |
| 1420 | ? VERTICAL_SCROLL_BAR_PIXEL_WIDTH (f) | 1420 | ? VERTICAL_SCROLL_BAR_PIXEL_WIDTH (f) |
| 1421 | : 0); | 1421 | : 0); |
| 1422 | f->display.x->pixel_width = CHAR_TO_PIXEL_WIDTH (f, f->width); | 1422 | f->display.x->pixel_width = CHAR_TO_PIXEL_WIDTH (f, f->width); |
| 1423 | f->display.x->pixel_height = CHAR_TO_PIXEL_HEIGHT (f, f->height); | 1423 | f->display.x->pixel_height = CHAR_TO_PIXEL_HEIGHT (f, f->height); |
| 1424 | 1424 | ||
| @@ -1436,6 +1436,9 @@ x_figure_window_size (f, parms) | |||
| 1436 | else if (! EQ (tem0, Qunbound) || ! EQ (tem1, Qunbound)) | 1436 | else if (! EQ (tem0, Qunbound) || ! EQ (tem1, Qunbound)) |
| 1437 | error ("Must specify *both* top and left corners"); | 1437 | error ("Must specify *both* top and left corners"); |
| 1438 | 1438 | ||
| 1439 | #if 0 /* PPosition and PSize mean "specified explicitly, | ||
| 1440 | by the program rather than by the user". So it is wrong to | ||
| 1441 | set them if nothing was specified. */ | ||
| 1439 | switch (window_prompting) | 1442 | switch (window_prompting) |
| 1440 | { | 1443 | { |
| 1441 | case USSize | USPosition: | 1444 | case USSize | USPosition: |
| @@ -1462,6 +1465,8 @@ x_figure_window_size (f, parms) | |||
| 1462 | put there. */ | 1465 | put there. */ |
| 1463 | abort (); | 1466 | abort (); |
| 1464 | } | 1467 | } |
| 1468 | #endif | ||
| 1469 | return window_prompting; | ||
| 1465 | } | 1470 | } |
| 1466 | 1471 | ||
| 1467 | static void | 1472 | static void |
| @@ -2170,7 +2175,7 @@ fonts), even if they match PATTERN and FACE.") | |||
| 2170 | if (!NILP (face)) | 2175 | if (!NILP (face)) |
| 2171 | CHECK_SYMBOL (face, 1); | 2176 | CHECK_SYMBOL (face, 1); |
| 2172 | if (!NILP (frame)) | 2177 | if (!NILP (frame)) |
| 2173 | CHECK_SYMBOL (frame, 2); | 2178 | CHECK_LIVE_FRAME (frame, 2); |
| 2174 | 2179 | ||
| 2175 | if (NILP (face)) | 2180 | if (NILP (face)) |
| 2176 | size_ref = 0; | 2181 | size_ref = 0; |
| @@ -3506,6 +3511,7 @@ DEFUN ("x-close-current-connection", Fx_close_current_connection, | |||
| 3506 | BLOCK_INPUT; | 3511 | BLOCK_INPUT; |
| 3507 | XSetCloseDownMode (x_current_display, DestroyAll); | 3512 | XSetCloseDownMode (x_current_display, DestroyAll); |
| 3508 | XCloseDisplay (x_current_display); | 3513 | XCloseDisplay (x_current_display); |
| 3514 | x_current_display = 0; | ||
| 3509 | } | 3515 | } |
| 3510 | else | 3516 | else |
| 3511 | fatal ("No current X display connection to close\n"); | 3517 | fatal ("No current X display connection to close\n"); |