emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] emacs-25 10870c8: Run `window-size-change-functions' also


From: Martin Rudalics
Subject: [Emacs-diffs] emacs-25 10870c8: Run `window-size-change-functions' also when reading from minibuffer
Date: Mon, 30 Nov 2015 17:25:20 +0000

branch: emacs-25
commit 10870c85445a48641b4f9cea91f8fbc7587eecde
Author: Martin Rudalics <address@hidden>
Commit: Martin Rudalics <address@hidden>

    Run `window-size-change-functions' also when reading from minibuffer
    
    * src/xdisp.c (redisplay_internal): Run `window-size-change-functions'
    also when reading from minibuffer.
---
 src/xdisp.c |   21 +++++++++++++++++++++
 1 files changed, 21 insertions(+), 0 deletions(-)

diff --git a/src/xdisp.c b/src/xdisp.c
index 50c5518..d1a10ca 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -13581,6 +13581,27 @@ redisplay_internal (void)
           && (current_buffer->clip_changed || window_outdated (w))
           && resize_mini_window (w, false))
     {
+      if (sf->redisplay)
+       {
+         Lisp_Object functions;
+         ptrdiff_t count1 = SPECPDL_INDEX ();
+
+         record_unwind_save_match_data ();
+
+         /* Clear flag first in case we get an error below.  */
+         FRAME_WINDOW_SIZES_CHANGED (sf) = false;
+         functions = Vwindow_size_change_functions;
+
+         while (CONSP (functions))
+           {
+             if (!EQ (XCAR (functions), Qt))
+               call1 (XCAR (functions), selected_frame);
+             functions = XCDR (functions);
+           }
+
+         unbind_to (count1, Qnil);
+       }
+
       /* Resized active mini-window to fit the size of what it is
          showing if its contents might have changed.  */
       must_finish = true;



reply via email to

[Prev in Thread] Current Thread [Next in Thread]