branch: elpa/iwindow
commit cbbcdb32b2cfc5c8977d8371521a00af9d2fd62e
Author: Akib Azmain Turja <a...@disroot.org>
Commit: Akib Azmain Turja <a...@disroot.org>

    Suppress runtime warning
    
    Warning was: Making face-remapping-alist buffer-local while
    locally let-bound!
---
 iwindow.el | 13 ++++++++-----
 1 file changed, 8 insertions(+), 5 deletions(-)

diff --git a/iwindow.el b/iwindow.el
index 3585e653a5..f63a0eb48b 100644
--- a/iwindow.el
+++ b/iwindow.el
@@ -233,11 +233,14 @@ WINDOWS and CALLBACK is described in the docstring of
                          (funcall payload)
                        (let ((face-remapping-alist
                               face-remapping-alist))
-                         (dolist (pair iwindow-highlight-faces)
-                           (face-remap-add-relative
-                            (car pair)
-                            `(:filtered (:window ,sym ,sym)
-                                        ,(cdr pair))))
+                         (cl-letf (((symbol-function
+                                     'make-local-variable)
+                                    #'ignore))
+                           (dolist (pair iwindow-highlight-faces)
+                             (face-remap-add-relative
+                              (car pair)
+                              `(:filtered (:window ,sym ,sym)
+                                          ,(cdr pair)))))
                          (push (current-buffer) buffers)
                          (funcall payload)))))))
       (setup-windows windows))))

Reply via email to