GNU bug report logs - #76176
30.0.93; Suggested command: narrow-to-thing-at-point

Message received at submit <at> debbugs.gnu.org:

Received: (at submit) by debbugs.gnu.org; 10 Feb 2025 12:34:23 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Mon Feb 10 07:34:23 2025
Received: from localhost ([127.0.0.1]:49451 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1thSzW-0005YQ-MQ
	for submit <at> debbugs.gnu.org; Mon, 10 Feb 2025 07:34:22 -0500
Received: from lists.gnu.org ([2001:470:142::17]:36262)
 by debbugs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.84_2) (envelope-from <psainty@HIDDEN>)
 id 1thSzT-0005Y6-KN
 for submit <at> debbugs.gnu.org; Mon, 10 Feb 2025 07:34:20 -0500
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 <psainty@HIDDEN>)
 id 1thSzM-0002aw-Gf
 for bug-gnu-emacs@HIDDEN; Mon, 10 Feb 2025 07:34:12 -0500
Received: from smtp-2.orcon.net.nz ([60.234.4.43])
 by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.90_1) (envelope-from <psainty@HIDDEN>)
 id 1thSzJ-0005zA-SA
 for bug-gnu-emacs@HIDDEN; Mon, 10 Feb 2025 07:34:12 -0500
Received: from [10.253.37.70] (port=35674 helo=webmail.orcon.net.nz)
 by smtp-2.orcon.net.nz with esmtpa (Exim 4.90_1)
 (envelope-from <psainty@HIDDEN>) id 1thSz6-0003nY-5n
 for bug-gnu-emacs@HIDDEN; Tue, 11 Feb 2025 01:33:56 +1300
Received: from ip-139-180-103-232.as55850.net ([139.180.103.232])
 via [10.253.37.253] by webmail.orcon.net.nz
 with HTTP (HTTP/1.1 POST); Tue, 11 Feb 2025 01:33:56 +1300
MIME-Version: 1.0
Content-Type: multipart/mixed;
 boundary="=_046f838a80b46c0b61f956d15370d277"
Date: Tue, 11 Feb 2025 01:33:56 +1300
From: Phil Sainty <psainty@HIDDEN>
To: bug-gnu-emacs@HIDDEN
Subject: 30.0.93; Suggested command: narrow-to-thing-at-point
Message-ID: <1796e05117f7f56a70710418a77c69f0@HIDDEN>
X-Sender: psainty@HIDDEN
User-Agent: Orcon Webmail
X-GeoIP: --
Received-SPF: pass client-ip=60.234.4.43; envelope-from=psainty@HIDDEN;
 helo=smtp-2.orcon.net.nz
X-Spam_score_int: -25
X-Spam_score: -2.6
X-Spam_bar: --
X-Spam_report: (-2.6 / 5.0 requ) BAYES_00=-1.9, FREEMAIL_FROM=0.001,
 RCVD_IN_DNSWL_LOW=-0.7, RCVD_IN_VALIDITY_CERTIFIED_BLOCKED=0.001,
 RCVD_IN_VALIDITY_RPBL_BLOCKED=0.001, SPF_HELO_NONE=0.001,
 SPF_PASS=-0.001 autolearn=ham autolearn_force=no
X-Spam_action: no action
X-Spam-Score: 0.7 (/)
X-Debbugs-Envelope-To: submit
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -0.3 (/)

--=_046f838a80b46c0b61f956d15370d277
Content-Transfer-Encoding: 7bit
Content-Type: text/plain; charset=US-ASCII;
 format=flowed

This command occurred to me today as a useful way to leverage the
thing-at-point machinery.

I've put together the attached implementation as a first pass, based on
what I could glean of the current thing-at-point functionality.

I didn't see any existing ways of listing known/valid things.  If I'm
gathering this correctly, it might be useful to separate that bit out
into another function.

What do you think?


-Phil

--=_046f838a80b46c0b61f956d15370d277
Content-Transfer-Encoding: base64
Content-Type: text/x-lisp;
 name=narrow-to-thing-at-point.el
Content-Disposition: attachment;
 filename=narrow-to-thing-at-point.el;
 size=1877

KHJlcXVpcmUgJ3RoaW5nYXRwdCkKKHJlcXVpcmUgJ2NsLWxpYikKCihkZWZpbmUta2V5IGN0bC14
LW1hcCAibnQiICduYXJyb3ctdG8tdGhpbmctYXQtcG9pbnQpCgooZGVmdW4gbmFycm93LXRvLXRo
aW5nLWF0LXBvaW50ICh0aGluZykKICAiTmFycm93IHRvIFRISU5HIGF0IHBvaW50LiAgSW50ZXJh
Y3RpdmVseSwgb2J0YWluIGEgdmFsaWQgVEhJTkcgdXNpbmcKYHJlYWQtdGhpbmctYXQtcG9pbnQt
dGhpbmcnLiAgV2l0aCBhIHByZWZpeCBhcmd1bWVudCwgc2VsZWN0IHRoZSB0aGluZwpmcm9tIGFs
bCBrbm93biB0aGluZ3MuIgogIChpbnRlcmFjdGl2ZSAobGlzdCAocmVhZC10aGluZy1hdC1wb2lu
dC10aGluZyBuaWwgY3VycmVudC1wcmVmaXgtYXJnKSkpCiAgKGlmLWxldCAoKGJvdW5kcyAoYm91
bmRzLW9mLXRoaW5nLWF0LXBvaW50IHRoaW5nKSkpCiAgICAgIChuYXJyb3ctdG8tcmVnaW9uIChj
YXIgYm91bmRzKSAoY2RyIGJvdW5kcykpCiAgICAodXNlci1lcnJvciAiTm8gJXMgYXQgcG9pbnQi
IHRoaW5nKSkpCgooZGVmdW4gcmVhZC10aGluZy1hdC1wb2ludC10aGluZyAoJm9wdGlvbmFsIHBy
b21wdCBhbGwpCiAgIlJldHVybiBhIFwidGhpbmdcIiBzdWl0YWJsZSBmb3IgYHRoaW5nLWF0LXBv
aW50Jy4KVGVzdCB0aGUga25vd24gXCJ0aGluZ3NcIiB0byBzZWUgd2hpY2ggYXJlIHZhbGlkLiAg
SWYgb25seSBvbmUgdGhpbmcgaXMKdmFsaWQgYXQgcG9pbnQsIHJldHVybiBpdHMgc3ltYm9sLiAg
SWYgbW9yZSB0aGFuIG9uZSB0aGluZyBpcyB2YWxpZCwKUFJPTVBUIHRoZSB1c2VyIHRvIGNob29z
ZSBmcm9tIHRoZSB2YWxpZCBvcHRpb25zLiAgSWYgQUxMIGlzIG5vbi1uaWwsCmNob29zZSBmcm9t
IGFsbCBrbm93biBcInRoaW5nc1wiIHdpdGhvdXQgdGVzdGluZyB0aGVpciB2YWxpZGl0eS4iCiAg
KGxldCogKChhbGx0aGluZ3MgKGNsLWRlbGV0ZS1kdXBsaWNhdGVzCiAgICAgICAgICAgICAgICAg
ICAgIChuY29uYwogICAgICAgICAgICAgICAgICAgICAgKGNsLWxvb3AgZm9yIHN5bSBiZWluZyB0
aGUgc3ltYm9scwogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgaWYgKG9yIChnZXQgc3lt
ICd0aGluZy1hdC1wb2ludCkKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAo
Z2V0IHN5bSAnYm91bmRzLW9mLXRoaW5nLWF0LXBvaW50KSkKICAgICAgICAgICAgICAgICAgICAg
ICAgICAgICAgIGNvbGxlY3Qgc3ltKQogICAgICAgICAgICAgICAgICAgICAgKG1hcGNhciAjJ2Nh
ciB0aGluZy1hdC1wb2ludC1wcm92aWRlci1hbGlzdCkpKSkKICAgICAgICAgKHRoaW5ncyAoaWYg
YWxsCiAgICAgICAgICAgICAgICAgICAgIGFsbHRoaW5ncwogICAgICAgICAgICAgICAgICAgKGNs
LWxvb3AgZm9yIHN5bSBpbiBhbGx0aGluZ3MKICAgICAgICAgICAgICAgICAgICAgICAgICAgIGlm
IChib3VuZHMtb2YtdGhpbmctYXQtcG9pbnQgc3ltKQogICAgICAgICAgICAgICAgICAgICAgICAg
ICAgY29sbGVjdCBzeW0pKSkpCiAgICAoY29uZCAoKG51bGwgdGhpbmdzKSAodXNlci1lcnJvciAi
Tm8gdGhpbmcgYXQgcG9pbnQiKSkKICAgICAgICAgICgoZXFsIDEgKGxlbmd0aCB0aGluZ3MpKSAo
Y2FyIHRoaW5ncykpCiAgICAgICAgICAodCAoaW50ZXJuIChjb21wbGV0aW5nLXJlYWQKICAgICAg
ICAgICAgICAgICAgICAgIChmb3JtYXQgKG9yIHByb21wdCAiTmFycm93IHRvIHRoaW5nIChkZWZh
dWx0ICVzKTogIikKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgKGNhciB0aGluZ3MpKQog
ICAgICAgICAgICAgICAgICAgICAgdGhpbmdzIG5pbCA6cmVxdWlyZS1tYXRjaCBuaWwgbmlsCiAg
ICAgICAgICAgICAgICAgICAgICAoc3ltYm9sLW5hbWUgKGNhciB0aGluZ3MpKSkpKSkpKQo=
--=_046f838a80b46c0b61f956d15370d277--