From patchwork Sat Jun 24 12:26:02 2023 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Hilton Chain X-Patchwork-Id: 51255 Return-Path: X-Original-To: patchwork@mira.cbaines.net Delivered-To: patchwork@mira.cbaines.net Received: by mira.cbaines.net (Postfix, from userid 113) id 6550227BBEA; Sat, 24 Jun 2023 13:27:28 +0100 (BST) X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on mira.cbaines.net X-Spam-Level: X-Spam-Status: No, score=-0.7 required=5.0 tests=BAYES_00,DKIM_INVALID, DKIM_SIGNED,FROM_SUSPICIOUS_NTLD,MAILING_LIST_MULTI,PDS_OTHER_BAD_TLD, SPF_HELO_PASS,URIBL_BLOCKED autolearn=no autolearn_force=no version=3.4.6 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) by mira.cbaines.net (Postfix) with ESMTPS id DE7B227BBE2 for ; Sat, 24 Jun 2023 13:27:26 +0100 (BST) Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1qD2M3-00041q-Er; Sat, 24 Jun 2023 08:27:03 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1qD2M2-00041Z-Il for guix-patches@gnu.org; Sat, 24 Jun 2023 08:27:02 -0400 Received: from debbugs.gnu.org ([209.51.188.43]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1qD2M2-0006lu-9R for guix-patches@gnu.org; Sat, 24 Jun 2023 08:27:02 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1qD2M2-0006Z8-3Y; Sat, 24 Jun 2023 08:27:02 -0400 X-Loop: help-debbugs@gnu.org Subject: [bug#64217] [PATCH v2 1/3] gnu: Add emacs-spamfilter-el. Resent-From: Hilton Chain Original-Sender: "Debbugs-submit" Resent-CC: andrew@trop.in, liliana.prikler@gmail.com, guix-patches@gnu.org Resent-Date: Sat, 24 Jun 2023 12:27:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 64217 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: "64217@debbugs.gnu.org"@debbugs.gnu.org Cc: Hilton Chain , Andrew Tropin , Liliana Marie Prikler X-Debbugs-Original-Xcc: Andrew Tropin , Liliana Marie Prikler Received: via spool by 64217-submit@debbugs.gnu.org id=B64217.168760956825150 (code B ref 64217); Sat, 24 Jun 2023 12:27:02 +0000 Received: (at 64217) by debbugs.gnu.org; 24 Jun 2023 12:26:08 +0000 Received: from localhost ([127.0.0.1]:40064 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qD2L9-0006XY-Gj for submit@debbugs.gnu.org; Sat, 24 Jun 2023 08:26:08 -0400 Received: from mail.boiledscript.com ([144.168.59.46]:37752) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qD2L6-0006XJ-Jk for 64217@debbugs.gnu.org; Sat, 24 Jun 2023 08:26:06 -0400 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=ultrarare.space; s=dkim; t=1687609369; h=from:from:reply-to:subject:subject:date:date:message-id:message-id: to:to:cc:cc:mime-version:mime-version: content-transfer-encoding:content-transfer-encoding: in-reply-to:in-reply-to:references:references; bh=PNMen6H8MhSRelBvvGFSO4weMv9unQnEB52R+oKk76A=; b=XLQLeMUOUrsBMWppAb+0tlUr9l7/hqLJsBvREGmjszb9yNvAMnRhAOwnGB/lGRWagOSDhh zIVq1S0aDvq1kIDTBBVRzOAXyWP/QVYAegAimADwsgodJbkY9+LytH0w3XQqGFYEJRSjbA Bv00uOB+M6nQ1YDemlYgPyRGWArb/7H2tWTGlnCnIaTQHgKsBg8DGBwqKaQ6vCUTo19rWJ YXypvn+s2SrjrF8KctEIpzFdgGqxkyD0w/oXTFvd7ucre/CmHoTrkjSQ+ovECrsf1yyaQa O5dpDdDvuTkGS+Osr9zpAUvkdO4dOkNEMJlU5Sls1yWuli5E/6m2l3j3P84FsQ== Date: Sat, 24 Jun 2023 20:26:02 +0800 Message-Id: <4b153ce02dab1dbf31e9e4d8f99059d096cda7ea.1687609087.git.hako@ultrarare.space> In-Reply-To: References: MIME-Version: 1.0 X-Spamd-Bar: -- Authentication-Results: mail.boiledscript.com; auth=pass smtp.mailfrom=hako@ultrarare.space X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: guix-patches@gnu.org List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Reply-to: Hilton Chain X-ACL-Warn: , Hilton Chain via Guix-patches X-Patchwork-Original-From: Hilton Chain via Guix-patches via From: Hilton Chain Errors-To: guix-patches-bounces+patchwork=mira.cbaines.net@gnu.org Sender: guix-patches-bounces+patchwork=mira.cbaines.net@gnu.org X-getmail-retrieved-from-mailbox: Patches * gnu/packages/emacs-xyz.scm (emacs-spamfilter-el): New variable. (emacs-wanderlust)[inputs]: Add emacs-spamfilter-el. --- gnu/packages/emacs-xyz.scm | 43 ++++++++++++++++++++++++++++++++++++++ 1 file changed, 43 insertions(+) diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm index 08d53be8a9..3d4e1fc045 100644 --- a/gnu/packages/emacs-xyz.scm +++ b/gnu/packages/emacs-xyz.scm @@ -35405,6 +35405,48 @@ (define-public emacs-spaceleader provides an easy way to bind keys under a configurable prefix key.") (license license:gpl3+)))) +(define-public emacs-spamfilter-el + (package + (name "emacs-spamfilter-el") + (version "1.13") + (source (origin + (method url-fetch) + (uri (string-append + "https://web.archive.org/web/20190227001412/" + "http://www.geocities.co.jp/SiliconValley-PaloAlto/7043/" + "spamfilter-1.1.tar.gz")) + (sha256 + (base32 + "1rd7wfn24bqlqlrrhq0d87vfhhcq09pnmrkkr7jpcnsls081a2iv")))) + (build-system emacs-build-system) + (arguments + (list #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'convert-encoding + (lambda _ + (for-each + (lambda (name) + (invoke "iconv" "-f" "EUC-JP" "-t" "UTF-8" name "-o" name)) + (find-files "." "\\.el"))))))) + (home-page + (string-append + "https://web.archive.org/web/20190326203214/" + "http://www.geocities.co.jp/SiliconValley-PaloAlto/7043/index.html#spamfilter.el")) + (synopsis "Bayesian spam filter") + (description + "This package provides a spam filtering library for Emacs MUAs. It +supports Japanese and has the following features: + +@itemize +@item Pure Emacs Lisp implementation. +@item Interactive process within the MUA. +@item Incremental corpus learning. +@item Three different methods for Japanese word segmentation. +@item Built-in support for @code{emacs-wanderlust} and @code{emacs-mew}. +@item @url{https://github.com/naota/navi2ch, Navi2ch} integration. +@end itemize\n") + (license license:gpl2+))) + (define-public emacs-promise ;; XXX: Last stable release fails to build with "(wrong-number-of-arguments ;; (3 . 4) 2)" error. @@ -37139,6 +37181,7 @@ (define-public emacs-wanderlust (invoke "make" "install") (invoke "make" "install-info")))))) (propagated-inputs (list emacs-semi-epg)) + (inputs (list emacs-spamfilter-el)) (home-page "https://www.emacswiki.org/emacs/WanderLust") (synopsis "Yet Another Message Interface on Emacsen") (description