scratch/electric-pair-cleanup-and-49518-bugfix 4c3da46 1/4: Speed up test/lisp/electric-tests.el when run interactively

[João Távora]

branch: scratch/electric-pair-cleanup-and-49518-bugfix
commit 4c3da467d01544902298c9775dcbfa0041874b45
Author: João Távora <joaotavora@gmail.com>
Commit: João Távora <joaotavora@gmail.com>

    Speed up test/lisp/electric-tests.el when run interactively
    
    'blink-paren-function' and its timers could sometimes interfere with
    the tests and slow them down significantly.
    
    * test/lisp/electric-tests.el (call-with-saved-electric-modes):
    Bind blink-paren-function to nil.
---
 test/lisp/electric-tests.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/test/lisp/electric-tests.el b/test/lisp/electric-tests.el
index 666de89..235f460 100644
--- a/test/lisp/electric-tests.el
+++ b/test/lisp/electric-tests.el
@@ -35,7 +35,8 @@
 (defun call-with-saved-electric-modes (fn)
   (let ((saved-electric (if electric-pair-mode 1 -1))
         (saved-layout (if electric-layout-mode 1 -1))
-        (saved-indent (if electric-indent-mode 1 -1)))
+        (saved-indent (if electric-indent-mode 1 -1))
+        (blink-paren-function nil))
     (electric-pair-mode -1)
     (electric-layout-mode -1)
     (electric-indent-mode -1)