From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/49861 Path: main.gmane.org!not-for-mail From: deskpot@myrealbox.com (Vasily Korytov) Newsgroups: gmane.emacs.gnus.general Subject: kill-region in mml-sec.el (patch) Date: Fri, 07 Feb 2003 06:08:23 +0300 Sender: owner-ding@hpc.uh.edu Message-ID: <87wukc6b4o.fsf@unix.home> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: multipart/signed; boundary="==-=-="; micalg=pgp-sha1; protocol="application/pgp-signature" X-Trace: main.gmane.org 1044587172 14443 80.91.224.249 (7 Feb 2003 03:06:12 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Fri, 7 Feb 2003 03:06:12 +0000 (UTC) Return-path: Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 18gyqA-0003kd-00 for ; Fri, 07 Feb 2003 04:06:10 +0100 Original-Received: from sina.hpc.uh.edu ([129.7.128.10] ident=lists) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 18gyrO-0001jh-00; Thu, 06 Feb 2003 21:07:26 -0600 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Thu, 06 Feb 2003 21:08:24 -0600 (CST) Original-Received: from sclp3.sclp.com (sclp3.sclp.com [66.230.238.2]) by sina.hpc.uh.edu (8.9.3/8.9.3) with SMTP id VAA20426 for ; Thu, 6 Feb 2003 21:08:12 -0600 (CST) Original-Received: (qmail 17096 invoked by alias); 7 Feb 2003 03:07:10 -0000 Original-Received: (qmail 17091 invoked from network); 7 Feb 2003 03:07:09 -0000 Original-Received: from ns1.telekom.ru (root@194.190.195.83) by 66.230.238.6 with SMTP; 7 Feb 2003 03:07:09 -0000 Original-Received: from unix.home (h105.217.elnet.msk.ru [194.190.217.105]) by ns1.telekom.ru (8.12.6/8.12.6) with SMTP id h1737DX8029614 for ; Fri, 7 Feb 2003 06:07:14 +0300 Original-Received: (qmail 689 invoked from network); 7 Feb 2003 03:09:41 -0000 Original-Received: from localhost (alias@127.0.0.1) by localhost with QMTP; 7 Feb 2003 03:09:41 -0000 Original-Received: (qmail 640 invoked by uid 1000); 7 Feb 2003 03:08:23 -0000 Original-To: ding@gnus.org X-Attribution: VK Mail-Copies-To: never User-Agent: Gnus/5.090015 (Oort Gnus v0.15) XEmacs/21.4 (Portable Code) Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:49861 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:49861 --==-=-= Content-Type: multipart/mixed; boundary="=-=-=" --=-=-= Content-Transfer-Encoding: quoted-printable I have mml-unsecure-message in some hooks (long to explain =3D). And it annoys me a lot, it copies the mml tag in the kill ring (and also in xclipboard, if it's active). Are there reasons to use there kill-region, not delete-region? If not, this patch works here. =3D)) --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=mml-sec.el.patch Content-Transfer-Encoding: quoted-printable Index: mml-sec.el =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D RCS file: /usr/local/cvsroot/gnus/lisp/mml-sec.el,v retrieving revision 1.20 diff -u -r1.20 mml-sec.el =2D-- mml-sec.el 21 Jan 2003 15:47:26 -0000 1.20 +++ mml-sec.el 7 Feb 2003 03:06:38 -0000 @@ -219,7 +219,7 @@ (save-excursion (goto-char (point-max)) (when (re-search-backward "^<#secure.*>\n" nil t) =2D (kill-region (match-beginning 0) (match-end 0))))) + (delete-region (match-beginning 0) (match-end 0))))) =20 (defun mml-secure-message-sign-smime () "Add MML tag to encrypt/sign the entire message." --=-=-= Content-Transfer-Encoding: quoted-printable =2D-=20 With respect, Vasily Korytov I accept RFC3156 and RFC1991-compatible encrypted mail. PGP key fingerprint: 123A 7CCE 6E26 6233 0D87 E01A A0F8 3524 FCD8 1841 --=-=-=-- --==-=-= Content-Type: application/pgp-signature -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.2.1 (GNU/Linux) iD8DBQE+QyMnoPg1JPzYGEERAvnfAJ4nMn91mFRpn920OYcmDM+Du1TrYACeLSQp gktwojjWtEZU7nijDeoNcM8= =2QgG -----END PGP SIGNATURE----- --==-=-=--