diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/w32fns.c | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/src/w32fns.c b/src/w32fns.c index 16a2fb4dfdd..aa7d6c7a0ea 100644 --- a/src/w32fns.c +++ b/src/w32fns.c | |||
| @@ -4892,12 +4892,21 @@ terminate Emacs if we can't open the connection. | |||
| 4892 | unsigned char *xrm_option; | 4892 | unsigned char *xrm_option; |
| 4893 | struct w32_display_info *dpyinfo; | 4893 | struct w32_display_info *dpyinfo; |
| 4894 | 4894 | ||
| 4895 | CHECK_STRING (display); | ||
| 4896 | |||
| 4897 | /* Signal an error in order to encourage correct use from callers. | ||
| 4898 | * If we ever support multiple window systems in the same Emacs, | ||
| 4899 | * we'll need callers to be precise about what window system they | ||
| 4900 | * want. */ | ||
| 4901 | |||
| 4902 | if (strcmp (SSDATA (display), "w32") != 0) | ||
| 4903 | error ("The name of the display in this Emacs must be \"w32\""); | ||
| 4904 | |||
| 4895 | /* If initialization has already been done, return now to avoid | 4905 | /* If initialization has already been done, return now to avoid |
| 4896 | overwriting critical parts of one_w32_display_info. */ | 4906 | overwriting critical parts of one_w32_display_info. */ |
| 4897 | if (w32_in_use) | 4907 | if (w32_in_use) |
| 4898 | return Qnil; | 4908 | return Qnil; |
| 4899 | 4909 | ||
| 4900 | CHECK_STRING (display); | ||
| 4901 | if (! NILP (xrm_string)) | 4910 | if (! NILP (xrm_string)) |
| 4902 | CHECK_STRING (xrm_string); | 4911 | CHECK_STRING (xrm_string); |
| 4903 | 4912 | ||