From 50daca5fdfede36b07dceb820de5324b66ec36c6 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Mon, 11 Nov 2024 18:04:52 +0200 Subject: [PATCH] * src/w32fns.c (process_dropfiles): Fix cygw32 build (bug#74312). (cherry picked from commit 6ddbe8c7010485f6bca80b6e898610d5831eac60) --- src/w32fns.c | 14 ++++++++++++++ 1 file changed, 14 insertions(+) diff --git a/src/w32fns.c b/src/w32fns.c index eb42d3b61b2..1bd3d5099e2 100644 --- a/src/w32fns.c +++ b/src/w32fns.c @@ -2479,9 +2479,22 @@ static Lisp_Object process_dropfiles (DROPFILES *files) { char *start_of_files = (char *) files + files->pFiles; +#ifndef NTGUI_UNICODE char filename[MAX_UTF8_PATH]; +#endif Lisp_Object lisp_files = Qnil; +#ifdef NTGUI_UNICODE + WCHAR *p = (WCHAR *) start_of_files; + for (; *p; p += wcslen (p) + 1) + { + Lisp_Object fn = from_unicode_buffer (p); +#ifdef CYGWIN + fn = Fcygwin_convert_file_name_to_windows (fn, Qt); +#endif + lisp_files = Fcons (fn, lisp_files); + } +#else if (files->fWide) { WCHAR *p = (WCHAR *) start_of_files; @@ -2502,6 +2515,7 @@ process_dropfiles (DROPFILES *files) lisp_files); } } +#endif return lisp_files; } -- 2.39.5