~abcdw/rde-devel

This thread contains a patchset. You're looking at the original emails, but you may wish to use the patch review UI. Review patch
1

[PATCH] rde: adding mail settings.

Details
Message ID
<87mtb3uy94.fsf@ngraves.fr>
DKIM signature
missing
Download raw message
Patch: +18 -0
---
 rde/features/mail.scm | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

diff --git a/rde/features/mail.scm b/rde/features/mail.scm
index f2f66aa..1953252 100644
--- a/rde/features/mail.scm
+++ b/rde/features/mail.scm
@@ -292,6 +292,8 @@ Citation line format, message signature, gpg and msmtp configurations. "
    (ovh . ((host . "ssl0.ovh.net")
            (port . 465)
            (tls_starttls . off)))
    (ovh-pro2 . ((host . "pro2.mail.ovh.net")
                 (port . 587)))
    (gmx-fr . ((host . "mail.gmx.net")
               (port . 587)))
    (generic . #f)))
@@ -530,6 +532,21 @@ logfile \"~/.local/var/log/msmtp.log\"\n")
                             #:subfolders 'Legacy
                             #:auth-mechs 'LOGIN))

(define outlook-fr-folder-mapping
  '(("inbox"   . "INBOX")
    ("sent"    . "&AMk-l&AOk-ments envoy&AOk-s") ;"Éléments envoyés"
    ("drafts"  . "Brouillons")
    ("archive" . "Notes")
    ("trash"   . "&AMk-l&AOk-ments supprim&AOk-s") ;"Éléments supprimés"
    ("spam"    . "Courrier ind&AOk-sirable"))) ;"Courrier indésirable"

(define (ovh-pro-isync-settings n)
  (generate-isync-serializer
    (string-append "pro" n ".mail.ovh.net")
    outlook-fr-folder-mapping
    #:auth-mechs 'LOGIN
    #:subfolders 'Legacy))

(define (generic-isync-settings mail-directory mail-account)
  (let* ((user     (mail-account-fqda mail-account)))
    `(,#~"# Do not know how to serialize generic accounts :("
@@ -541,6 +558,7 @@ logfile \"~/.local/var/log/msmtp.log\"\n")
    (gandi . ,gandi-isync-settings)
    (gmx-fr . ,gmx-fr-isync-settings)
    (ovh . ,ovh-isync-settings)
    (ovh-pro2 . ,(ovh-pro-isync-settings "2"))
    (generic . ,generic-isync-settings)))

(define default-isync-global-settings
-- 
2.37.3

-- 
Best regards,
Nicolas Graves
Details
Message ID
<87h717rhfs.fsf@trop.in>
In-Reply-To
<87mtb3uy94.fsf@ngraves.fr> (view parent)
DKIM signature
pass
Download raw message
On 2022-09-13 16:47, Nicolas Graves wrote:

> ---
>  rde/features/mail.scm | 18 ++++++++++++++++++
>  1 file changed, 18 insertions(+)
>
> diff --git a/rde/features/mail.scm b/rde/features/mail.scm
> index f2f66aa..1953252 100644
> --- a/rde/features/mail.scm
> +++ b/rde/features/mail.scm
> @@ -292,6 +292,8 @@ Citation line format, message signature, gpg and msmtp configurations. "
>      (ovh . ((host . "ssl0.ovh.net")
>              (port . 465)
>              (tls_starttls . off)))
> +    (ovh-pro2 . ((host . "pro2.mail.ovh.net")
> +                 (port . 587)))
>      (gmx-fr . ((host . "mail.gmx.net")
>                 (port . 587)))
>      (generic . #f)))
> @@ -530,6 +532,21 @@ logfile \"~/.local/var/log/msmtp.log\"\n")
>                               #:subfolders 'Legacy
>                               #:auth-mechs 'LOGIN))
>  
> +(define outlook-fr-folder-mapping
> +  '(("inbox"   . "INBOX")
> +    ("sent"    . "&AMk-l&AOk-ments envoy&AOk-s") ;"Éléments envoyés"
> +    ("drafts"  . "Brouillons")
> +    ("archive" . "Notes")
> +    ("trash"   . "&AMk-l&AOk-ments supprim&AOk-s") ;"Éléments supprimés"
> +    ("spam"    . "Courrier ind&AOk-sirable"))) ;"Courrier indésirable"
> +
> +(define (ovh-pro-isync-settings n)
> +  (generate-isync-serializer
> +    (string-append "pro" n ".mail.ovh.net")
> +    outlook-fr-folder-mapping
> +    #:auth-mechs 'LOGIN
> +    #:subfolders 'Legacy))
> +
>  (define (generic-isync-settings mail-directory mail-account)
>    (let* ((user     (mail-account-fqda mail-account)))
>      `(,#~"# Do not know how to serialize generic accounts :("
> @@ -541,6 +558,7 @@ logfile \"~/.local/var/log/msmtp.log\"\n")
>      (gandi . ,gandi-isync-settings)
>      (gmx-fr . ,gmx-fr-isync-settings)
>      (ovh . ,ovh-isync-settings)
> +    (ovh-pro2 . ,(ovh-pro-isync-settings "2"))
>      (generic . ,generic-isync-settings)))
>  
>  (define default-isync-global-settings
> -- 
> 2.37.3

Reworded commit message, applied.  Slightly reorganized settings
definitions and changed ovh-pro2 to ovh-pro2-fr.

-- 
Best regards,
Andrew Tropin
Reply to thread Export thread (mbox)