From faf071ad5a9fc9b536f14eec7b8c570e551ca495 Mon Sep 17 00:00:00 2001 From: Tom Willemse Date: Mon, 13 Nov 2017 13:37:54 -0800 Subject: [PATCH] Add SubFolders to MBSync conf mode --- .../mbsync-conf-mode/mbsync-conf-mode.el | 53 +++++++++++++++---- 1 file changed, 44 insertions(+), 9 deletions(-) diff --git a/emacs/.emacs.d/vendor-lisp/mbsync-conf-mode/mbsync-conf-mode.el b/emacs/.emacs.d/vendor-lisp/mbsync-conf-mode/mbsync-conf-mode.el index 81cac0b..3b8c921 100644 --- a/emacs/.emacs.d/vendor-lisp/mbsync-conf-mode/mbsync-conf-mode.el +++ b/emacs/.emacs.d/vendor-lisp/mbsync-conf-mode/mbsync-conf-mode.el @@ -28,19 +28,54 @@ ;;;###autoload (define-generic-mode mbsync-conf-mode '(?#) - '("Path" "MaxSize" "MapInbox" "Flatten" "Trash" "TrashNewOnly" - "TrashRemoteNew" "AltMap" "Inbox" "InfoDelimiter" "Host" "Port" "User" - "Pass" "PassCmd" "Tunnel" "AuthMechs" "SSLType" "SSLVersions" - "SystemCertificates" "CertificateFile" "PipelineDepth" "Account" - "UseNamespace" "PathDelimiter" "Master" "Slave" "Pattern" "Patterns" - "MaxMessages" "ExpireUnread" "Sync" "Create" "Remove" "Expunge" - "CopyArrivalDate" "SyncState" "Channels" "FSync" "FieldDelimiter" - "BufferLimit") + '("Path" + "MaxSize" + "MapInbox" + "Flatten" + "Trash" + "TrashNewOnly" + "TrashRemoteNew" + "AltMap" + "Inbox" + "InfoDelimiter" + "Host" + "Port" + "User" + "Pass" + "PassCmd" + "Tunnel" + "AuthMechs" + "SSLType" + "SSLVersions" + "SystemCertificates" + "CertificateFile" + "PipelineDepth" + "Account" + "UseNamespace" + "PathDelimiter" + "Master" + "Slave" + "Pattern" + "Patterns" + "MaxMessages" + "ExpireUnread" + "Sync" + "Create" + "Remove" + "Expunge" + "CopyArrivalDate" + "SyncState" + "Channels" + "FSync" + "FieldDelimiter" + "BufferLimit" + "SubFolders") `((,(rx (or "MaildirStore" "IMAPAccount" "IMAPStore" "Channel" "Group")) (0 font-lock-keyword-face) (".*" nil nil (0 font-lock-type-face))) (,(rx (or "yes" "no" "None" "STARTTLS" "IMAPS" "SSLv2" "SSLv3" "Pull" "Push" - "New" "ReNew" "Delete" "Flags" "All" "Master" "Slave" "Both")) + "New" "ReNew" "Delete" "Flags" "All" "Master" "Slave" "Both" + "Verbatim" "Maildir++" "Legacy")) . font-lock-constant-face)) '("\\.mbsyncrc\\'") nil