procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Use generic compute_fringe_widths.

Browse source
This commit is contained in:
Kim F. Storm 2003-03-12 12:12:26 +00:00
parent ffbbc941e0
commit 055d3c98b7
6 changed files with 8 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/gtkutil.c
View file

@ -345,7 +345,7 @@ xg_frame_set_char_size (f, cols, rows)
: (FRAME_SCROLL_BAR_COLS (f)
* FONT_WIDTH (f->output_data.x->font)));
x_compute_fringe_widths (f, 0);
compute_fringe_widths (f, 0);
/* Must resize our top level widget. Font size may have changed,
but not rows/cols. */

2
src/macfns.c
View file

@ -3534,7 +3534,7 @@ x_figure_window_size (f, parms)
? FRAME_SCROLL_BAR_PIXEL_WIDTH (f)
: (FRAME_SCROLL_BAR_COLS (f) * FONT_WIDTH (f->output_data.mac->font)));
x_compute_fringe_widths (f, 0);
compute_fringe_widths (f, 0);
f->output_data.mac->pixel_width = CHAR_TO_PIXEL_WIDTH (f, f->width);
f->output_data.mac->pixel_height = CHAR_TO_PIXEL_HEIGHT (f, f->height);

5
src/w32fns.c
View file

@ -60,7 +60,6 @@ void globals_of_w32fns ();
static void init_external_image_libraries ();
extern void free_frame_menubar ();
extern void x_compute_fringe_widths P_ ((struct frame *, int));
extern double atof ();
extern int w32_console_toggle_lock_key P_ ((int, Lisp_Object));
extern void w32_menu_display_help P_ ((HWND, HMENU, UINT, UINT));
@ -2521,7 +2520,7 @@ x_set_fringe_width (f, new_value, old_value)
struct frame *f;
Lisp_Object new_value, old_value;
{
x_compute_fringe_widths (f, 1);
compute_fringe_widths (f, 1);
}
void
@ -3336,7 +3335,7 @@ x_figure_window_size (f, parms)
? FRAME_SCROLL_BAR_PIXEL_WIDTH (f)
: (FRAME_SCROLL_BAR_COLS (f) * FONT_WIDTH (f->output_data.w32->font)));
x_compute_fringe_widths (f, 0);
compute_fringe_widths (f, 0);
f->output_data.w32->pixel_width = CHAR_TO_PIXEL_WIDTH (f, f->width);
f->output_data.w32->pixel_height = CHAR_TO_PIXEL_HEIGHT (f, f->height);

4
src/widget.c
View file

@ -434,7 +434,7 @@ set_frame_size (ew)
: (FRAME_SCROLL_BAR_COLS (frame)
* FONT_WIDTH (frame->output_data.x->font)));
x_compute_fringe_widths (frame, 0);
compute_fringe_widths (frame, 0);
#if 0 /* This can run Lisp code, and it is dangerous to give
out the frame to Lisp code before it officially exists.
@ -915,7 +915,7 @@ EmacsFrameSetCharSize (widget, columns, rows)
? 0
: (FRAME_SCROLL_BAR_COLS (f) * FONT_WIDTH (f->output_data.x->font)));
x_compute_fringe_widths (f, 0);
compute_fringe_widths (f, 0);
char_to_pixel_size (ew, columns, rows, &pixel_width, &pixel_height);

4
src/xfns.c
View file

@ -2057,7 +2057,7 @@ x_set_fringe_width (f, new_value, old_value)
struct frame *f;
Lisp_Object new_value, old_value;
{
x_compute_fringe_widths (f, 1);
compute_fringe_widths (f, 1);
}
void
@ -3329,7 +3329,7 @@ x_figure_window_size (f, parms)
? 0
: (FRAME_SCROLL_BAR_COLS (f) * FONT_WIDTH (f->output_data.x->font)));
x_compute_fringe_widths (f, 0);
compute_fringe_widths (f, 0);
f->output_data.x->pixel_width = CHAR_TO_PIXEL_WIDTH (f, f->width);
f->output_data.x->pixel_height = CHAR_TO_PIXEL_HEIGHT (f, f->height);

1
src/xterm.h
View file

@ -1062,7 +1062,6 @@ extern int x_had_errors_p P_ ((Display *));
extern void x_uncatch_errors P_ ((Display *, int));
extern Lisp_Object x_new_font P_ ((struct frame *, char *));
extern Lisp_Object x_new_fontset P_ ((struct frame *, char *));
extern void x_compute_fringe_widths P_ ((struct frame *, int));
extern void x_set_offset P_ ((struct frame *, int, int, int));
extern void x_set_window_size P_ ((struct frame *, int, int, int));
extern void x_set_mouse_position P_ ((struct frame *, int, int));