From 9a81c86bd32f3f497f31e3e58a3bdf27d1977b64 Mon Sep 17 00:00:00 2001 From: Taylor R Campbell Date: Thu, 20 Jun 2013 15:32:16 +0000 Subject: [PATCH] Use WITH-LIMITED-INTERRUPTS, not WITH-INTERRUPT-MASK, for IMAP update. --- src/imail/imail-imap.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/imail/imail-imap.scm b/src/imail/imail-imap.scm index 09ad2de60..01afc12f9 100644 --- a/src/imail/imail-imap.scm +++ b/src/imail/imail-imap.scm @@ -1014,7 +1014,7 @@ USA. ;;; operation atomically. (define (update-imap-folder-length! folder count) - (with-interrupt-mask interrupt-mask/gc-ok + (with-limited-interrupts interrupt-mask/gc-ok (lambda (interrupt-mask) (cond ((or (imap-folder-messages-synchronized? folder 'FLAGS) (zero? (folder-length folder))) -- 2.25.1