[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/w32fns.c
From: |
Jason Rumney |
Subject: |
[Emacs-diffs] Changes to emacs/src/w32fns.c |
Date: |
Fri, 10 Jun 2005 19:03:28 -0400 |
Index: emacs/src/w32fns.c
diff -c emacs/src/w32fns.c:1.247 emacs/src/w32fns.c:1.248
*** emacs/src/w32fns.c:1.247 Fri Jun 10 14:21:22 2005
--- emacs/src/w32fns.c Fri Jun 10 23:03:28 2005
***************
*** 7808,7813 ****
--- 7808,7814 ----
{
OPENFILENAME file_details;
+ BOOL file_opened = FALSE;
/* Prevent redisplay. */
specbind (Qinhibit_redisplay, Qt);
***************
*** 7836,7842 ****
file_details.lpfnHook = (LPOFNHOOKPROC) file_dialog_callback;
! if (GetOpenFileName (&file_details))
{
dostounix_filename (filename);
if (file_details.nFilterIndex == 2)
--- 7837,7847 ----
file_details.lpfnHook = (LPOFNHOOKPROC) file_dialog_callback;
! file_opened = GetOpenFileName (&file_details);
!
! UNBLOCK_INPUT;
!
! if (file_opened)
{
dostounix_filename (filename);
if (file_details.nFilterIndex == 2)
***************
*** 7857,7863 ****
dir, mustmatch, dir, Qfile_name_history,
default_filename, Qnil);
- UNBLOCK_INPUT;
file = unbind_to (count, file);
}
--- 7862,7867 ----