diff options
| author | Eli Zaretskii | 2013-12-28 13:47:26 +0200 |
|---|---|---|
| committer | Eli Zaretskii | 2013-12-28 13:47:26 +0200 |
| commit | bf7bea5de09945949ab969f663aaf00fed1f67b4 (patch) | |
| tree | ede99c7808adecb46544974c00b9fef37df04012 /src | |
| parent | efe702196ac87ce78d753672013429018e723a9e (diff) | |
| download | emacs-bf7bea5de09945949ab969f663aaf00fed1f67b4.tar.gz emacs-bf7bea5de09945949ab969f663aaf00fed1f67b4.zip | |
Fix bug #14739 with creation of GUI frames from TTY session on Windows.
src/w32fns.c (Fx_create_frame): Error out if called from a TTY
session.
lisp/frame.el (window-system-for-display): Don't allow to create a
GUI frame from a -nw session on MS-Windows.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 5 | ||||
| -rw-r--r-- | src/w32fns.c | 3 |
2 files changed, 8 insertions, 0 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 6bdadaf796f..2749399d392 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2013-12-28 Eli Zaretskii <eliz@gnu.org> | ||
| 2 | |||
| 3 | * w32fns.c (Fx_create_frame): Error out if called from a TTY | ||
| 4 | session. (Bug#14739) | ||
| 5 | |||
| 1 | 2013-12-27 Jarek Czekalski <jarekczek@poczta.onet.pl> | 6 | 2013-12-27 Jarek Czekalski <jarekczek@poczta.onet.pl> |
| 2 | 7 | ||
| 3 | * callproc.c (Vexec_path): Document that exec-directory is in it. | 8 | * callproc.c (Vexec_path): Document that exec-directory is in it. |
diff --git a/src/w32fns.c b/src/w32fns.c index 9536b146535..5ecddbc11d3 100644 --- a/src/w32fns.c +++ b/src/w32fns.c | |||
| @@ -4346,6 +4346,9 @@ This function is an internal primitive--use `make-frame' instead. */) | |||
| 4346 | Lisp_Object parent; | 4346 | Lisp_Object parent; |
| 4347 | struct kboard *kb; | 4347 | struct kboard *kb; |
| 4348 | 4348 | ||
| 4349 | if (!FRAME_W32_P (SELECTED_FRAME ())) | ||
| 4350 | error ("Cannot create a GUI frame in a -nw session"); | ||
| 4351 | |||
| 4349 | /* Make copy of frame parameters because the original is in pure | 4352 | /* Make copy of frame parameters because the original is in pure |
| 4350 | storage now. */ | 4353 | storage now. */ |
| 4351 | parameters = Fcopy_alist (parameters); | 4354 | parameters = Fcopy_alist (parameters); |