+
+(define-public python-django-mailman3
+ (package
+ (name "python-django-mailman3")
+ (version "1.0.1")
+ (source
+ (origin
+ (method url-fetch)
+ (uri (pypi-uri "django-mailman3" version))
+ (sha256
+ (base32
+ "1adxyh8knw9knjlh73xq0jpn5adml0ck4alsv0swakm95wfyx46z"))))
+ (build-system python-build-system)
+ (inputs
+ `(("python-django" ,python-django)))
+ (propagated-inputs
+ `(("python-requests" ,python-requests)
+ ("python-requests-oauthlib" ,python-requests-oauthlib)
+ ("python-openid" ,python-openid)
+ ("python-mailmanclient" ,python-mailmanclient)
+ ("python-django-allauth" ,python-django-allauth)
+ ("python-django-gravatar2" ,python-django-gravatar2)
+ ("python-pytz" ,python-pytz)))
+ (home-page "https://gitlab.com/mailman/django-mailman3")
+ (synopsis "Django library for Mailman UIs")
+ (description
+ "Libraries and templates for Django-based interfaces
+interacting with Mailman.")
+ (license gpl3+)))
+
+(define-public python2-django-mailman3
+ (let ((base (package-with-python2
+ python-django-mailman3)))
+ (package
+ (inherit base)
+ (propagated-inputs
+ `(("python2-openid" ,python2-openid)
+ ,@(package-propagated-inputs base))))))
+
+(define-public postorius
+ (package
+ (name "postorius")
+ (version "1.0.3")
+ (source
+ (origin
+ (method url-fetch)
+ (uri (pypi-uri "postorius" version "+post2.tar.gz"))
+ (file-name (string-append name "-" version ".tar.gz"))
+ (sha256
+ (base32
+ "1wymcpv2icjjy8h1ni52p6dr7wwxf71ivqgbqhzx4i82yqphcaq5"))))
+ (build-system python-build-system)
+ (arguments
+ `(; One test dependency relies on Persona, which was shut down in
+ ;; November 2016.
+ #:tests? #f
+ ;; The part of the frontend of Mailman is still python 2.7.
+ #:python ,python-2))
+ (inputs
+ `(("python2-django" ,python2-django)
+ ("python2-django-mailman3" ,python2-django-mailman3)
+ ("python2-mailmanclient" ,python2-mailmanclient)))
+ (home-page "https://gitlab.com/mailman/postorius")
+ (synopsis "Web user interface for GNU Mailman")
+ (description
+ "Postorius is a Django app which provides a web user interface
+to access GNU Mailman.")
+ (license (list gpl3+ lgpl3+))))
+
+(define-public blists
+ (package
+ (name "blists")
+ (version "1.0")
+ (source
+ (origin
+ (method url-fetch)
+ (uri (string-append "http://download.openwall.net/pub/projects/"
+ "blists/blists-" version ".tar.gz"))
+ (sha256
+ (base32
+ "1gp51kmb8yv8d693wcpdslmwlbw5w2kgz4kxhrcaf7y89w8wy4qd"))))
+ (build-system gnu-build-system)
+ (arguments
+ `(#:tests? #f ; No tests
+ #:phases
+ (modify-phases %standard-phases
+ (delete 'configure)
+ (replace 'install
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let* ((out (assoc-ref outputs "out"))
+ (bin (string-append out "/bin")))
+ (install-file "bindex" bin)
+ (install-file "bit" bin)
+ #t))))))
+ (home-page "http://www.openwall.com/blists/")
+ (synopsis "Web interface to mailing list archives")
+ (description
+ "Blists is a web interface to mailing list archives that works off
+indexed mbox files. There are two programs: @code{bindex} and @code{bit}.
+@code{bindex} generates or updates the index file (incremental updates
+are supported). @code{bit} is a CGI/SSI program that generates web pages
+on the fly. Both programs are written in C and are very fast.")
+ (license license:expat)))
+
+(define-public swaks
+ (package
+ (name "swaks")
+ (version "20170101.0")
+ (source
+ (origin
+ (method url-fetch)
+ (uri (string-append
+ "http://jetmore.org/john/code/swaks/files/swaks-"
+ version ".tar.gz"))
+ (sha256
+ (base32
+ "0pli4mlhasnqqxmmxalwyg3x7n2vhcbgsnp2xgddamjavv82vrl4"))))
+ (build-system perl-build-system)
+ (inputs
+ `(("perl-net-dns" ,perl-net-dns)
+ ("perl-net-ssleay" ,perl-net-ssleay)))
+ (arguments
+ `(#:tests? #f ; No tests
+ #:phases
+ (modify-phases %standard-phases
+ (delete 'configure)
+ (replace 'build
+ (lambda _
+ (zero? (system* "pod2man" "doc/ref.pod" "swaks.1"))))
+ (replace 'install
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let ((out (assoc-ref outputs "out")))
+ (install-file "swaks" (string-append out "/bin"))
+ (install-file "swaks.1" (string-append out "/share/man/man1")))
+ #t))
+ (add-after 'install 'wrap-program
+ (lambda* (#:key outputs #:allow-other-keys)
+ (wrap-program (string-append (assoc-ref outputs "out")
+ "/bin/swaks")
+ `("PERL5LIB" ":" = (,(getenv "PERL5LIB"))))
+ #t)))))
+ (home-page "http://jetmore.org/john/code/swaks/")
+ (synopsis "Featureful SMTP test tool")
+ (description "Swaks is a flexible, scriptable, transaction-oriented SMTP
+test tool. It handles SMTP features and extensions such as TLS,
+authentication, and pipelining; multiple versions of the SMTP protocol
+including SMTP, ESMTP, and LMTP; and multiple transport methods including
+unix-domain sockets, internet-domain sockets, and pipes to spawned processes.
+Options can be specified in environment variables, configuration files, and
+the command line allowing maximum configurability and ease of use for
+operators and scripters.")
+ (license gpl2+)))
+
+(define-public alpine
+ (package
+ (name "alpine")
+ (version "2.21")
+ (source
+ (origin
+ (method url-fetch)
+ ;; There are two versions: the plain continuation of Alpine without extra
+ ;; patches and the version which adds extra fixes. Every distro uses
+ ;; the patched version, and so do we to not break expectations.
+ ;; http://patches.freeiz.com/alpine/readme/README.patches
+ (uri (string-append "http://patches.freeiz.com/alpine/patches/alpine-"
+ version "/alpine-" version ".tar.xz"))
+ (sha256
+ (base32
+ "1k9hcfjywfk3mpsl71hjza3nk6icgf1b6xxzgx10kdzg5yci5x5m"))))
+ (build-system gnu-build-system)
+ (arguments
+ `(#:make-flags (list "CC=gcc")
+ #:configure-flags (list (string-append "--with-ssl-include-dir="
+ (assoc-ref %build-inputs "openssl")
+ "/include/openssl")
+ (string-append "--with-ssl-dir="
+ (assoc-ref %build-inputs "openssl"))
+ (string-append "--with-ssl-certs-dir="
+ "/etc/ssl/certs/")
+ (string-append "--with-ssl-lib-dir="
+ (assoc-ref %build-inputs "openssl")
+ "/lib")
+ (string-append "--with-interactive-spellcheck="
+ (assoc-ref %build-inputs "aspell")
+ "/bin/aspell"))
+ #:phases
+ (modify-phases %standard-phases
+ (add-after 'unpack 'make-reproducible
+ (lambda _
+ ;; This removes time-dependent code to make alpine reproducible.
+ (substitute* "pico/blddate.c"
+ (("%02d-%s-%d") "1970-01-01"))
+ (substitute* (list "alpine/Makefile.in"
+ "web/src/alpined.d/Makefile.in")
+ (("`date`") "1970-01-01"))
+ #t)))))
+ (inputs
+ `(("ncurses" ,ncurses)
+ ("openssl" ,openssl)
+ ("gnutls" ,gnutls)
+ ("openldap" ,openldap)
+ ("cyrus-sasl" ,cyrus-sasl)
+ ("mit-krb5" ,mit-krb5)
+ ("aspell" ,aspell)
+ ("tcl" ,tcl)
+ ("linux-pam" ,linux-pam)))
+ (home-page "http://patches.freeiz.com/alpine/")
+ (synopsis "Alternatively Licensed Program for Internet News and Email")
+ (description
+ "Alpine is a text-based mail and news client. Alpine includes several
+tools and applications:
+@enumerate
+@item alpine, the Alpine mailer
+@item pico, the standalone text editor, GNU nano's predecessor
+@item pilot, the standalone file system navigator
+@end enumerate\n")
+ (license asl2.0)))
+
+(define-public balsa
+ (package
+ (name "balsa")
+ (version "2.5.3")
+ (source
+ (origin
+ (method url-fetch)
+ (uri (string-append "https://pawsa.fedorapeople.org/balsa/balsa-"
+ version ".tar.bz2"))
+ (sha256
+ (base32
+ "15jkwp3ylbwd8iha4dr37z1xb6mkk31ym90vv3h2a5xk2rmym5mq"))))
+ (build-system gnu-build-system)
+ (arguments
+ `(#:configure-flags
+ '(;; Balsa tries to install additional MIME icons
+ ;; under gtk+ directory.
+ "--enable-extra-mimeicons=no"
+ "--with-gtksourceview"
+ "--with-canberra"
+ "--with-spell-checker=gtkspell"
+ "--with-gpgme"
+ "--with-sqlite"
+ "--with-compface"
+ "--with-ldap")))
+ (inputs
+ `(("cyrus-sasl" ,cyrus-sasl)
+ ("enchant" ,enchant)
+ ("gdk-pixbuf" ,gdk-pixbuf)
+ ("gmime" ,gmime)
+ ("gnutls" ,gnutls)
+ ("gpgme" ,gpgme)
+ ("gtk+" ,gtk+)
+ ("gtksourceview" ,gtksourceview)
+ ("gtkspell3" ,gtkspell3)
+ ("libcanberra" ,libcanberra)
+ ("libesmtp" ,libesmtp)
+ ("libnotify" ,libnotify)
+ ("openldap" ,openldap)
+ ("sqlite" ,sqlite)
+ ("webkitgtk" ,webkitgtk)))
+ (native-inputs
+ `(("compface" ,compface)
+ ("glib" ,glib "bin")
+ ("intltool" ,intltool)
+ ("pkg-config" ,pkg-config)
+ ("yelp-tools" ,yelp-tools)))
+ (home-page "https://pawsa.fedorapeople.org/balsa")
+ (synopsis "E-mail client for GNOME")
+ (description "Balsa is a highly configurable and robust mail client for
+the GNOME desktop. It supports both POP3 and IMAP servers as well as the
+mbox, maildir and mh local mailbox formats. Balsa also supports SMTP and/or
+the use of a local MTA such as Sendemail.")
+ (license gpl3+)))