From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Reiner Steib Newsgroups: gmane.emacs.devel,gmane.emacs.gnus.general Subject: Re: Small patch to enable use of gpg-agent with pgg Date: Thu, 23 Mar 2006 13:51:24 +0100 Message-ID: References: <2cd46e7f0510031250u66ea1349yb437d539ce4027ef@mail.gmail.com> <20051007214952.GA30235@kenny.sha-bang.local> <20051008103627.GA1218@kenny.sha-bang.local> <2cd46e7f0510081131h14e2bbeaga7f1a33ebd6347c8@mail.gmail.com> <2cd46e7f0510101415t76825ea7u9749fe23da54ce@mail.gmail.com> <2cd46e7f0510121647x3c51fb65pc883ed61f4e864ab@mail.gmail.com> <2cd46e7f0510200708x4640d1c2t50743cf439e52dd4@mail.gmail.com> <87pskfq361.fsf@latte.josefsson.org> <87zmjicv9d.fsf@latte.josefsson.org> <87irq6yrfo.fsf@latte.josefsson.org> <87slp9y15z.fsf@latte.josefsson.org> <87wtelwhvl.fsf@latte.josefsson.org> <87odzx4dpp.fsf@latte.josefsson.org> <87k6al4djh.fsf@latte.josefsson.org> Reply-To: Reiner Steib NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1143118341 8373 80.91.229.2 (23 Mar 2006 12:52:21 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Thu, 23 Mar 2006 12:52:21 +0000 (UTC) Cc: Sascha Wilde , "Daiki Ueno \(pgg author\)" , ding@gnus.org, emacs-devel@gnu.org, Katsumi Yamaoka , Miles Bader Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Thu Mar 23 13:52:15 2006 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1FMPI9-00021G-Vt for ged-emacs-devel@m.gmane.org; Thu, 23 Mar 2006 13:51:55 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1FMPI9-0006SI-Na for ged-emacs-devel@m.gmane.org; Thu, 23 Mar 2006 07:51:53 -0500 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1FMPHx-0006S5-Ig for emacs-devel@gnu.org; Thu, 23 Mar 2006 07:51:41 -0500 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1FMPHv-0006RL-Pc for emacs-devel@gnu.org; Thu, 23 Mar 2006 07:51:41 -0500 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1FMPHv-0006RB-JA for emacs-devel@gnu.org; Thu, 23 Mar 2006 07:51:39 -0500 Original-Received: from [134.60.1.1] (helo=mail.uni-ulm.de) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA:32) (Exim 4.52) id 1FMPIR-000372-Uz; Thu, 23 Mar 2006 07:52:12 -0500 Original-Received: from bridgekeeper.physik.uni-ulm.de (bridgekeeper.physik.uni-ulm.de [134.60.10.123]) by mail.uni-ulm.de (8.13.6/8.13.6) with ESMTP id k2NCpOV7018506; Thu, 23 Mar 2006 13:51:24 +0100 (MET) Original-Received: by bridgekeeper.physik.uni-ulm.de (Postfix, from userid 170) id 207EB1107E; Thu, 23 Mar 2006 13:51:24 +0100 (CET) Original-To: Simon Josefsson X-Face: 3Phac&+dw=IZHjhua]bp}LH<*p{qzj8u+ List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:52003 gmane.emacs.gnus.general:62386 Archived-At: On Thu, Mar 23 2006, Simon Josefsson wrote: > To clarify: I removed it in v5-10 only. For Emacs CVS, Sascha's patch > work fine so it can stay (although perhaps should be removed there > too, to simplify syncing?). It would be very much preferable to have the same code at least in Emacs CVS and Gnus v5-10 branch. (-> Cc-ing Miles.) > For Gnus CVS trunk, I don't know whether it works or not (does it > work on the XEmacs version Gnus CVS require?). Given that Emacs 21 and XEmacs also complain (see Katsumi's message ), we also need a fix for the Gnus trunk. Couldn't we let `pgg-gpg-update-agent' simply return `t' if `make-network-process' isn't available? (Or check for `make-network-process' directly in `pgg-gpg-use-agent-p'?) (defun pgg-gpg-update-agent () "Try to connet to gpg-agent and send UPDATESTARTUPTTY." (if (fboundp 'make-network-process) (let* ((agent-info (getenv "GPG_AGENT_INFO")) (socket (and agent-info (string-match "^\\([^:]*\\)" agent-info) (match-string 1 agent-info))) (conn (and socket (make-network-process :name "gpg-agent-process" :host 'local :family 'local :service socket)))) (when (and conn (eq (process-status conn) 'open)) (process-send-string conn "UPDATESTARTUPTTY\n") (delete-process conn) t)) ;; We can't check, so assume gpg-agent is up. t)) Bye, Reiner. -- ,,, (o o) ---ooO-(_)-Ooo--- | PGP key available | http://rsteib.home.pages.de/