diff options
| author | Paul Eggert | 2015-01-04 13:20:36 -0800 |
|---|---|---|
| committer | Paul Eggert | 2015-01-04 13:21:03 -0800 |
| commit | bf90e9ac7caec15b0f111e0bb67e311233f3a795 (patch) | |
| tree | fea081a587642f7d542ff0ec008310d38b575304 /src | |
| parent | cde73794f61fec2a5a8676c2e36ec6634e72cdc5 (diff) | |
| download | emacs-bf90e9ac7caec15b0f111e0bb67e311233f3a795.tar.gz emacs-bf90e9ac7caec15b0f111e0bb67e311233f3a795.zip | |
'temacs -nw' should not call missing functions
Without this patch, "temacs -nw" fails with the diagnostic
"emacs: Symbol's function definition is void: frame-windows-min-size"
and messes up the tty's state.
* lib-src/make-docfile.c (write_globals):
Declare Fframe_windows_min_size with ATTRIBUTE_CONST, too. Sort.
* src/frame.c (Fframe_windows_min_size): New placeholder function.
(syms_of_frame): Define it.
* src/window.c (Fwindow__sanitize_window_sizes): New placeholder.
(syms_of_window): Define it.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 9 | ||||
| -rw-r--r-- | src/frame.c | 17 | ||||
| -rw-r--r-- | src/window.c | 9 |
3 files changed, 33 insertions, 2 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 592a7f1e3bf..8cf269680de 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,5 +1,14 @@ | |||
| 1 | 2015-01-04 Paul Eggert <eggert@cs.ucla.edu> | 1 | 2015-01-04 Paul Eggert <eggert@cs.ucla.edu> |
| 2 | 2 | ||
| 3 | 'temacs -nw' should not call missing functions | ||
| 4 | Without this patch, "temacs -nw" fails with the diagnostic | ||
| 5 | "emacs: Symbol's function definition is void: frame-windows-min-size" | ||
| 6 | and messes up the tty's state. | ||
| 7 | * frame.c (Fframe_windows_min_size): New placeholder function. | ||
| 8 | (syms_of_frame): Define it. | ||
| 9 | * window.c (Fwindow__sanitize_window_sizes): New placeholder. | ||
| 10 | (syms_of_window): Define it. | ||
| 11 | |||
| 3 | Less 'make' chatter for lisp dir | 12 | Less 'make' chatter for lisp dir |
| 4 | * Makefile.in (%.elc): Adjust to compile-onefile change in | 13 | * Makefile.in (%.elc): Adjust to compile-onefile change in |
| 5 | ../lisp/Makefile.in. | 14 | ../lisp/Makefile.in. |
diff --git a/src/frame.c b/src/frame.c index 5a0d142afbb..9394ae481f5 100644 --- a/src/frame.c +++ b/src/frame.c | |||
| @@ -334,10 +334,22 @@ predicates which report frame's specific UI-related capabilities. */) | |||
| 334 | return type; | 334 | return type; |
| 335 | } | 335 | } |
| 336 | 336 | ||
| 337 | /* Placeholder used by temacs -nw before window.el is loaded. */ | ||
| 338 | DEFUN ("frame-windows-min-size", Fframe_windows_min_size, | ||
| 339 | Sframe_windows_min_size, 4, 4, 0, | ||
| 340 | doc: /* */) | ||
| 341 | (Lisp_Object frame, Lisp_Object horizontal, | ||
| 342 | Lisp_Object ignore, Lisp_Object pixelwise) | ||
| 343 | { | ||
| 344 | return make_number (0); | ||
| 345 | } | ||
| 346 | |||
| 337 | static int | 347 | static int |
| 338 | frame_windows_min_size (Lisp_Object frame, Lisp_Object horizontal, Lisp_Object ignore, Lisp_Object pixelwise) | 348 | frame_windows_min_size (Lisp_Object frame, Lisp_Object horizontal, |
| 349 | Lisp_Object ignore, Lisp_Object pixelwise) | ||
| 339 | { | 350 | { |
| 340 | return XINT (call4 (Qframe_windows_min_size, frame, horizontal, ignore, pixelwise)); | 351 | return XINT (call4 (Qframe_windows_min_size, frame, horizontal, |
| 352 | ignore, pixelwise)); | ||
| 341 | } | 353 | } |
| 342 | 354 | ||
| 343 | 355 | ||
| @@ -5081,6 +5093,7 @@ even if this option is non-nil. */); | |||
| 5081 | defsubr (&Sframep); | 5093 | defsubr (&Sframep); |
| 5082 | defsubr (&Sframe_live_p); | 5094 | defsubr (&Sframe_live_p); |
| 5083 | defsubr (&Swindow_system); | 5095 | defsubr (&Swindow_system); |
| 5096 | defsubr (&Sframe_windows_min_size); | ||
| 5084 | defsubr (&Smake_terminal_frame); | 5097 | defsubr (&Smake_terminal_frame); |
| 5085 | defsubr (&Shandle_switch_frame); | 5098 | defsubr (&Shandle_switch_frame); |
| 5086 | defsubr (&Sselect_frame); | 5099 | defsubr (&Sselect_frame); |
diff --git a/src/window.c b/src/window.c index 938f1a3268f..45dfb9ea1c2 100644 --- a/src/window.c +++ b/src/window.c | |||
| @@ -3014,6 +3014,14 @@ resize_root_window (Lisp_Object window, Lisp_Object delta, Lisp_Object horizonta | |||
| 3014 | return call5 (Qwindow_resize_root_window, window, delta, horizontal, ignore, pixelwise); | 3014 | return call5 (Qwindow_resize_root_window, window, delta, horizontal, ignore, pixelwise); |
| 3015 | } | 3015 | } |
| 3016 | 3016 | ||
| 3017 | /* Placeholder used by temacs -nw before window.el is loaded. */ | ||
| 3018 | DEFUN ("window--sanitize-window-sizes", Fwindow__sanitize_window_sizes, | ||
| 3019 | Swindow__sanitize_window_sizes, 2, 2, 0, | ||
| 3020 | doc: /* */) | ||
| 3021 | (Lisp_Object frame, Lisp_Object horizontal) | ||
| 3022 | { | ||
| 3023 | return Qnil; | ||
| 3024 | } | ||
| 3017 | 3025 | ||
| 3018 | Lisp_Object | 3026 | Lisp_Object |
| 3019 | sanitize_window_sizes (Lisp_Object frame, Lisp_Object horizontal) | 3027 | sanitize_window_sizes (Lisp_Object frame, Lisp_Object horizontal) |
| @@ -7563,6 +7571,7 @@ displayed after a scrolling operation to be somewhat inaccurate. */); | |||
| 7563 | defsubr (&Sset_window_display_table); | 7571 | defsubr (&Sset_window_display_table); |
| 7564 | defsubr (&Snext_window); | 7572 | defsubr (&Snext_window); |
| 7565 | defsubr (&Sprevious_window); | 7573 | defsubr (&Sprevious_window); |
| 7574 | defsubr (&Swindow__sanitize_window_sizes); | ||
| 7566 | defsubr (&Sget_buffer_window); | 7575 | defsubr (&Sget_buffer_window); |
| 7567 | defsubr (&Sdelete_other_windows_internal); | 7576 | defsubr (&Sdelete_other_windows_internal); |
| 7568 | defsubr (&Sdelete_window_internal); | 7577 | defsubr (&Sdelete_window_internal); |