From mboxrd@z Thu Jan 1 00:00:00 1970 X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on inbox.vuxu.org X-Spam-Level: X-Spam-Status: No, score=-3.4 required=5.0 tests=DKIM_SIGNED,DKIM_VALID, DKIM_VALID_AU,FREEMAIL_FROM,MAILING_LIST_MULTI,RCVD_IN_DNSWL_MED, T_SCC_BODY_TEXT_LINE autolearn=ham autolearn_force=no version=3.4.4 Received: (qmail 26529 invoked from network); 25 Aug 2022 03:05:14 -0000 Received: from lists.gnu.org (209.51.188.17) by inbox.vuxu.org with ESMTPUTF8; 25 Aug 2022 03:05:14 -0000 Received: from localhost ([::1]:42918 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1oR3B9-0008GT-Hq for ml@inbox.vuxu.org; Wed, 24 Aug 2022 23:05:11 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:54852) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1oR3B0-0008Fy-Ku for info-gnus-english@gnu.org; Wed, 24 Aug 2022 23:05:07 -0400 Received: from pv50p00im-ztdg10021201.me.com ([17.58.6.45]:51544) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1oR3Ay-0003dM-KH for info-gnus-english@gnu.org; Wed, 24 Aug 2022 23:05:02 -0400 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=icloud.com; s=1a1hai; t=1661396676; bh=kevg5tXF1ZzqUkia4VJjVEF8tu7j95xpPUrSwLJLebo=; h=From:To:Subject:Date:Message-ID:MIME-Version:Content-Type; b=yX2Rl978yFv5CTxd1MGfatDLi1nZFaNpdBd19nKFIkcle9kPFCgkCzLrIimLsxSRo NwE77X9SaCaOGdgfJzn0rvAhGi5/EUDCpYCjVv2k1x/gAfGHn2DUNj4fOOLWw68JZP a4/rImYzFDEtNFHZd2wYKZSnsw5rU/X7ro+bre0/eMuYV8qXZM4skd2+En4xpH8urs bHPbChRQjpocROG+X1+Nb7tRPPfMaLMoZfbPwu07v9gb4QY9Yuvx5VdXnOJBYFyYh8 SRVlMW/yd+8Sw0VDlAC3izijsia+n9VDYj5jOOxKSMGQQ0Sv2jYdqISW0t494RS/F4 +7MDdmWC63hTA== Received: from arch (pv50p00im-dlb-asmtp-mailmevip.me.com [17.56.9.10]) by pv50p00im-ztdg10021201.me.com (Postfix) with ESMTPSA id 573AE68049D for ; Thu, 25 Aug 2022 03:04:35 +0000 (UTC) From: Satoshi Yoshida To: info-gnus-english@gnu.org Subject: Re: Strip signature on reply without standard separator [solved] References: <87y1vykpl2.fsf@icloud.com> <87zggbz3ho.fsf@icloud.com> <87bksaz837.fsf@icloud.com> <87a67ul62m.fsf@dataswamp.org> <87mtbufg7e.fsf@icloud.com> <875yii2oru.fsf@dataswamp.org> X-Operating-System: Linux version 5.19.3-arch1-1 Arch Linux x86_64 Date: Thu, 25 Aug 2022 12:04:34 +0900 In-Reply-To: <875yii2oru.fsf@dataswamp.org> (Emanuel Berg's message of "Wed, 24 Aug 2022 07:28:53 +0200") Message-ID: <875yih6n25.fsf_-_@icloud.com> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/28.1 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-Proofpoint-GUID: smnv9hwHnIpEOXFqm8pvJDhYOm98arRB X-Proofpoint-ORIG-GUID: smnv9hwHnIpEOXFqm8pvJDhYOm98arRB X-Proofpoint-Virus-Version: =?UTF-8?Q?vendor=3Dfsecure_engine=3D1.1.170-22c6f66c430a71ce266a39bfe25bc?= =?UTF-8?Q?2903e8d5c8f:6.0.517,18.0.883,17.11.64.514.0000000_definitions?= =?UTF-8?Q?=3D2022-06-21=5F08:2022-06-21=5F01,2022-06-21=5F08,2022-02-23?= =?UTF-8?Q?=5F01_signatures=3D0?= X-Proofpoint-Spam-Details: rule=notspam policy=default score=17 malwarescore=0 suspectscore=0 adultscore=0 bulkscore=0 mlxscore=17 clxscore=1015 spamscore=17 phishscore=0 mlxlogscore=70 classifier=spam adjust=0 reason=mlx scancount=1 engine=8.12.0-2206140000 definitions=main-2208250009 Received-SPF: pass client-ip=17.58.6.45; envelope-from=dynamisxar@icloud.com; helo=pv50p00im-ztdg10021201.me.com X-Spam_score_int: -27 X-Spam_score: -2.8 X-Spam_bar: -- X-Spam_report: (-2.8 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, FREEMAIL_FROM=0.001, RCVD_IN_DNSWL_LOW=-0.7, RCVD_IN_MSPIKE_H2=-0.001, SPF_HELO_NONE=0.001, SPF_PASS=-0.001, T_SCC_BODY_TEXT_LINE=-0.01 autolearn=ham autolearn_force=no X-Spam_action: no action X-BeenThere: info-gnus-english@gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: "Announcements and discussions for GNUS, the GNU Emacs Usenet newsreader \(in English\)" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: info-gnus-english-bounces+ml=inbox.vuxu.org@gnu.org Sender: "info-gnus-english" Emanuel Berg writes: > Satoshi Yoshida wrote: > >> (add-hook 'mu-cite-post-cite-hook >> (lambda nil > > Most people would put it (lambda () ... ) I understand. > If you quote a lambda it is just a list with data: > > '(a b c) > > '(lambda not an anonymous function) > > Eval and you will see, there's no difference in > principle. Lists. Thank you for your assistance. [Summary] Install mu-cite. It's easy from MELPA. And add this to .emacs (autoload 'mu-cite-original "mu-cite" nil t) ;; for all but message-mode ;(add-hook 'mail-citation-hook (function mu-cite-original)) ;; for message-mode only (setq message-cite-function (function mu-cite-original)) Add this to .gnus.el or .emacs (setq mu-cite-prefix-format '("> ")) (setq mu-cite-cited-prefix-regexp "\\(^[^ \t\n<>]+>+[ \t]*\\)") (setq mu-cite-top-format '(from " writes:\n\n")) (add-hook 'mu-cite-post-cite-hook (lambda () (save-excursion (save-excursion (goto-char (point-min)) (replace-regexp "^> >" ">>") (goto-char (point-min)) (replace-regexp "^> -- .*\n\\(>.*\n\\)*" "") (goto-char (point-min)) (replace-regexp "^\\(>[ \t]+\n\\)+> \\(best\ \\( regards\\| wishes\\)?\\|cheers\\|\\(good\\)?bye\\|good luck\ \\|\\(kind \\|warm\\(est\\)? \\)?regards\\|respectfully\\|\ \\(yours \\)?sincerely\\( yours\\)?\\|thank you\\( very much\\)?\ \\|\\(many \\)?thanks\\( in advance\\| very much\\)?\\),[ \t]*\n\ \\(>.*\n\\)*" "") (goto-char (point-min)) (replace-regexp "^\\(>[ \t]+\n\\)+> [ \t]*\ \\(-+[ \t]*\\)?[a-zA-Z]+[ \t]*\n\\(>[ \t]+\n\\)*\n-- " "\n-- ") (goto-char (point-min)) (replace-regexp "^\\(>[> \t]+\n\\)+\n-- " "\n-- ")) (goto-line 1) (delete-blank-lines)))) Referenced: https://melpa.org/#/mu-cite http://roguelife.org/~tsumura/emacs/mu-cite.html https://pc11.5ch.net/test/read.cgi/unix/1114097161/ -- Satoshi Yoshida