aboutsummaryrefslogtreecommitdiff
path: root/gnu/packages/mail.scm
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2020-09-14 13:17:40 +0200
committerRicardo Wurmus <rekado@elephly.net>2020-09-14 13:17:46 +0200
commitf6807498bea9471dd7ef9b09359ba9077e7094e6 (patch)
tree6554eb8dbab25770a109f1a1bbc46db7ed6e50a0 /gnu/packages/mail.scm
parentc22c6de453a4685bc65bf38f92f823c733d62290 (diff)
downloadguix-f6807498bea9471dd7ef9b09359ba9077e7094e6.tar
guix-f6807498bea9471dd7ef9b09359ba9077e7094e6.tar.gz
gnu: Add altermime.
* gnu/packages/mail.scm (altermime): New variable.
Diffstat (limited to 'gnu/packages/mail.scm')
-rw-r--r--gnu/packages/mail.scm63
1 files changed, 63 insertions, 0 deletions
diff --git a/gnu/packages/mail.scm b/gnu/packages/mail.scm
index 4a9c6fc90f..2244653724 100644
--- a/gnu/packages/mail.scm
+++ b/gnu/packages/mail.scm
@@ -627,6 +627,69 @@ Extension (MIME).")
(base32
"0slzlzcr3h8jikpz5a5amqd0csqh2m40gdk910ws2hnaf5m6hjbi"))))))
+(define-public altermime
+ (package
+ (name "altermime")
+ (version "0.3.10")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append "http://pldaniels.com/altermime/altermime-"
+ version ".tar.gz"))
+ (sha256
+ (base32
+ "0vn3vmbcimv0n14khxr1782m76983zz9sf4j2kz5v86lammxld43"))))
+ (build-system gnu-build-system)
+ (arguments
+ `(#:make-flags (list "CC=gcc"
+ (string-append "PREFIX=" (assoc-ref %outputs "out")))
+ #:tests? #f ; there are none
+ #:phases
+ (modify-phases %standard-phases
+ (delete 'configure)
+ (add-after 'unpack 'fix-bugs
+ (lambda _
+ (substitute* "MIME_headers.c"
+ (("hinfo->filename, sizeof\\(hinfo->name\\)")
+ "hinfo->filename, sizeof(hinfo->filename)")
+ (("memset\\(hinfo->defects, 0, _MIMEH_DEFECT_ARRAY_SIZE\\);")
+ "memset(hinfo->defects, 0, sizeof(hinfo->defects));"))
+ (substitute* "pldstr.c"
+ (("if \\(\\(st->start\\)&&\\(st->start != '\\\\0'\\)\\)")
+ "if ((st->start)&&(*st->start != '\\0'))"))
+ (substitute* "qpe.c"
+ (("if \\(lineend != '\\\\0'\\)")
+ "if (*lineend != '\\0')"))
+ #t))
+ (add-after 'unpack 'install-to-prefix
+ (lambda _
+ (substitute* "Makefile"
+ (("/usr/local") "${PREFIX}")
+ (("cp altermime.*") "install -D -t ${PREFIX}/bin altermime\n"))
+ #t))
+ (add-after 'unpack 'disable-Werror
+ (lambda _
+ (substitute* "Makefile"
+ (("-Werror") ""))
+ #t)))))
+ (home-page "https://pldaniels.com/altermime/")
+ (synopsis "Modify MIME-encoded messages")
+ (description
+ "alterMIME is a small program which is used to alter your mime-encoded
+mailpack. What can alterMIME do?
+
+@enumerate
+@item Insert disclaimers,
+@item insert arbitary X-headers,
+@item modify existing headers,
+@item remove attachments based on filename or content-type,
+@item replace attachments based on filename.
+@end enumerate
+.")
+ ;; MIME_headers.c is distributed under BSD-3; the rest of the code is
+ ;; published under the alterMIME license.
+ (license (list (license:non-copyleft "file://LICENSE")
+ license:bsd-3))))
+
(define-public bogofilter
(package
(name "bogofilter")