From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/84252 Path: news.gmane.org!not-for-mail From: Rainer M Krug Newsgroups: gmane.emacs.gnus.general Subject: Re: How to get message-id from message? Date: Thu, 27 Feb 2014 15:09:41 +0100 Message-ID: References: <87fvn4j45h.fsf@thinkpad-t61.fritz.box> <87txbkhep3.fsf@thinkpad-t61.fritz.box> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: multipart/signed; boundary="=-=-="; micalg=pgp-sha1; protocol="application/pgp-signature" X-Trace: ger.gmane.org 1393510213 29747 80.91.229.3 (27 Feb 2014 14:10:13 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Thu, 27 Feb 2014 14:10:13 +0000 (UTC) To: ding@gnus.org Original-X-From: ding-owner+M32500@lists.math.uh.edu Thu Feb 27 15:10:20 2014 Return-path: Envelope-to: ding-account@gmane.org Original-Received: from util0.math.uh.edu ([129.7.128.18]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1WJ1fF-0004Qz-Lj for ding-account@gmane.org; Thu, 27 Feb 2014 15:10:17 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by util0.math.uh.edu with smtp (Exim 4.63) (envelope-from ) id 1WJ1f3-0001vh-Vv; Thu, 27 Feb 2014 08:10:06 -0600 Original-Received: from mx2.math.uh.edu ([129.7.128.33]) by util0.math.uh.edu with esmtps (TLSv1:AES256-SHA:256) (Exim 4.63) (envelope-from ) id 1WJ1f2-0001vS-5f for ding@lists.math.uh.edu; Thu, 27 Feb 2014 08:10:04 -0600 Original-Received: from quimby.gnus.org ([80.91.231.51]) by mx2.math.uh.edu with esmtps (TLSv1:AES128-SHA:128) (Exim 4.76) (envelope-from ) id 1WJ1f0-0003st-Qu for ding@lists.math.uh.edu; Thu, 27 Feb 2014 08:10:03 -0600 Original-Received: from plane.gmane.org ([80.91.229.3]) by quimby.gnus.org with esmtp (Exim 4.80) (envelope-from ) id 1WJ1ey-0001w9-G6 for ding@gnus.org; Thu, 27 Feb 2014 15:10:00 +0100 Original-Received: from list by plane.gmane.org with local (Exim 4.69) (envelope-from ) id 1WJ1ev-0002ws-Rg for ding@gnus.org; Thu, 27 Feb 2014 15:09:57 +0100 Original-Received: from arn78-1-88-186-171-7.fbx.proxad.net ([88.186.171.7]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Thu, 27 Feb 2014 15:09:57 +0100 Original-Received: from Rainer by arn78-1-88-186-171-7.fbx.proxad.net with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Thu, 27 Feb 2014 15:09:57 +0100 X-Injected-Via-Gmane: http://gmane.org/ Original-Lines: 71 Original-X-Complaints-To: usenet@ger.gmane.org X-Gmane-NNTP-Posting-Host: arn78-1-88-186-171-7.fbx.proxad.net User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3 (darwin) Cancel-Lock: sha1:nLcKWGL+WnBoHdRZVlQJ3kIofG4= X-Spam-Score: -1.9 (-) List-ID: Precedence: bulk Xref: news.gmane.org gmane.emacs.gnus.general:84252 Archived-At: --=-=-= Content-Type: text/plain Content-Transfer-Encoding: quoted-printable Tassilo Horn writes: > Rainer M Krug writes: > >> The following now works perfectly: > > Great! > >> --8<---------------cut here---------------start------------->8--- >> (defun rmk/gnus-goto-message-in-notmuch () >> (interactive) >> (unless (buffer-live-p gnus-summary-buffer) >> (user-error "No open Gnus summary buffer!")) >> (let ((message-id (substring (with-current-buffer gnus-summary-buffer >> (mail-header-id (gnus-summary-article-h= eader))) 1 -1) >> )) >>=20=20=20=20=20 >> (message message-id) >> (notmuch-search (concatenate 'string "id:" message-id)) ;; Now do th= e notmuch stuff >> )) >> --8<---------------cut here---------------end--------------->8--- >> >> I am sure the indentations and line breaks are completely un-lisp. ANy >> tips in this regard? > > Closing parens are usually not on their own line. And the correct > indentation is the one emacs chooses when you hit tab. OK - thanks. > > Many people hacking lisp regularly (me included) swear by paredit.el > which allows for real structural editing which frees you from manual > indenting and paren placement. I'll check it out for my occasional hacking. Thanks a lot, Rainer > > Bye, > Tassilo =2D-=20 Rainer M. Krug email: RMKruggmailcom --=-=-= Content-Type: application/pgp-signature -----BEGIN PGP SIGNATURE----- Version: GnuPG/MacGPG2 v2.0.22 (Darwin) iQEcBAEBAgAGBQJTD0clAAoJENvXNx4PUvmCqIsH/1rXC9TWWi/PW5alrCLEYcq8 ncmCIlj94dCMQwkW3RIlHsQd5MSYhWzFLwI3GPKc8IgL7Qgq+4sQzhfn4gdeden1 kh8J5IZ/d8gAP17yfo1GrgsU6VfZzuN/aVwG/3wWjmSNPuQhsntEOm1JDnTdUys5 YILUb2pId9vQihxe1Hoh5JMHW8wot+zwWQ3UmFj2Z3s75+Mml63/SLql271hhLsA A4h7+yHl5LciK49Q+jl81/nHzsj4A+JBXKf2qZzH7Q/qSigZwvUQoIPcQvdDgTEL qMALGAZNRAVyRMJVS2DoRuoNmVwrl2+psNJq/AXHZVoVYSbg6uyt3aMV8oomNvY= =8qnB -----END PGP SIGNATURE----- --=-=-=--