From ee3c75c440d137a73449efdc5c3ed2b7fa96a6bd Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Sat, 8 Jun 2019 14:23:48 -0700 Subject: [PATCH] Fix incorrect edit. --- 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 733cc7791..5aafa5385 100644 --- a/src/imail/imail-imap.scm +++ b/src/imail/imail-imap.scm @@ -139,7 +139,7 @@ USA. (cond ((string-ci=? "inbox" mailbox) "inbox") ((and (string-prefix-ci? "inbox/" mailbox) (not (string-prefix? "inbox/" mailbox))) - (string-downcase (string-slice mailbox 0 5))) + (string-downcase (substring mailbox 0 5))) (else mailbox))) (define (compatible-imap-urls? url1 url2) -- 2.25.1