(check_windows_init_file): Fix allocation of error buffer.

1 files changed, 3 insertions, 1 deletions

diff --git a/src/w32.c b/src/w32.c
index c7f6e3172f9..9a51233527d 100644
--- a/src/w32.c
+++ b/src/w32.c
@@ -3894,7 +3894,9 @@ check_windows_init_file ()
           Lisp_Object load_path_print = Fprin1_to_string (full_load_path, Qnil);
           char *init_file_name = SDATA (init_file);
           char *load_path = SDATA (load_path_print);
-          char *buffer = alloca (1024);
+          char *buffer = alloca (1024
+                                 + strlen (init_file_name)
+                                 + strlen (load_path));
 
           sprintf (buffer,
                    "The Emacs Windows initialization file \"%s.el\" "