From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp2 ([2001:41d0:8:6d80::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms0.migadu.com with LMTPS id 2JCyB2xVPGGh0AAAgWs5BA (envelope-from ) for ; Sat, 11 Sep 2021 09:06:20 +0200 Received: from aspmx1.migadu.com ([2001:41d0:8:6d80::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp2 with LMTPS id AGxZA2xVPGEIIAAAB5/wlQ (envelope-from ) for ; Sat, 11 Sep 2021 07:06:20 +0000 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by aspmx1.migadu.com (Postfix) with ESMTPS id 94A9223E3B for ; Sat, 11 Sep 2021 09:06:19 +0200 (CEST) Received: from localhost ([::1]:52680 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1mOx5d-0006BI-2q for larch@yhetil.org; Sat, 11 Sep 2021 03:06:17 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:36982) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1mOx5C-0006B0-JL for emacs-orgmode@gnu.org; Sat, 11 Sep 2021 03:05:50 -0400 Received: from mail-wm1-x336.google.com ([2a00:1450:4864:20::336]:34361) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1mOx5B-0001fN-3K for emacs-orgmode@gnu.org; Sat, 11 Sep 2021 03:05:50 -0400 Received: by mail-wm1-x336.google.com with SMTP id v20-20020a1cf714000000b002e71f4d2026so2144317wmh.1 for ; Sat, 11 Sep 2021 00:05:47 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20210112; h=mime-version:reply-to:from:date:message-id:subject:to; bh=Y9W/aLvX47GjYumyJfdyuMr683kUkQ/4FZDt29m0qPw=; b=AzAYyDsNi4SsrctYT3WRIMX/xjp7V0etdVB6Ya/Hs6FcM037VK4EvbpFCabQ1gz1aO XhBZVlc1md5BGQPS1FT3qHPjfl81tGO6V0h/sh4OiK4tG9ECI8XsKwtS/XAXZNLmLPvi rTfdUikqqkVZ++xpOQQu2iidClAN4oKXQm7c3+JJHBjXAArOwCCoO13Zxzko8ZOslD0J m5x/WNhueqbqFDS6OdU/atnz7p58O+sCjuGGKi5b7G2sdW8/ovGANFKtgTe74P0GUvDG 7Zl1Sggeorw1vBFQrPbmb/NhoSZGttAsc79EotgowmaUYI9rafGKwG9tNbsBfz/1S3Ky YBKA== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20210112; h=x-gm-message-state:mime-version:reply-to:from:date:message-id :subject:to; bh=Y9W/aLvX47GjYumyJfdyuMr683kUkQ/4FZDt29m0qPw=; b=cefHEOMAKKqynhNLCBBNRwohIqYJCd1n1QSLu3O4NsJjcpcfHVUMRJCswytieGfhDr 1fhhv/Gy8vmhlt2mzbpPkRe0RSbCqyC4sHmG4CvFbd2oahkpcwGmAkUGwMRYSL6xpUmq IfDMSsEf8lmTYDibsydUKHf1k/GA1c+UpPHR3FqB1oPP0cg7kFwGfHJfEHrWp7VU4I6U WaDJdtNaiwigHp8x+WPo+YPSm0XKQIMnI8Gvwpll3AgiE0vZtJpqPYrBBl7ihcDLyRUs jEtN8tjIkNIAgc4q+cEUGJyGeyrsHFyMjhCMuu3aUlzBnwoGVfRyDjwGbxSRmq10BnH0 d1tw== X-Gm-Message-State: AOAM531PIVd+opO3UKPWZlCiou3QYHihZjp8hwngs1vvQU3Y+jlBA57M zdcmu+J5hUt6BvDhWWqNOYkZ8HQDFdgC1JW4HaxaXb0ME+RsIg== X-Google-Smtp-Source: ABdhPJxflwu3xfIeqx2t78AfStHspNCghiTFTiwl/dg/s3lLEXv1VLWQk0yj6hQl8ETbi4x5+Kiw6/Dkj32QdCzAbLk= X-Received: by 2002:a05:600c:245:: with SMTP id 5mr531218wmj.53.1631343946589; Sat, 11 Sep 2021 00:05:46 -0700 (PDT) MIME-Version: 1.0 From: Mark Dawson Date: Sat, 11 Sep 2021 08:05:36 +0100 Message-ID: Subject: [PATCH] ob-tangle.el: Fix error in org-tangle from org-src edit buffer To: emacs-orgmode@gnu.org Content-Type: multipart/alternative; boundary="00000000000071693705cbb2dcae" Received-SPF: pass client-ip=2a00:1450:4864:20::336; envelope-from=markgdawson@gmail.com; helo=mail-wm1-x336.google.com X-Spam_score_int: -20 X-Spam_score: -2.1 X-Spam_bar: -- X-Spam_report: (-2.1 / 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, HTML_MESSAGE=0.001, RCVD_IN_DNSWL_NONE=-0.0001, SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-BeenThere: emacs-orgmode@gnu.org X-Mailman-Version: 2.1.23 Precedence: list List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Reply-To: markgdawson@gmail.com Errors-To: emacs-orgmode-bounces+larch=yhetil.org@gnu.org Sender: "Emacs-orgmode" X-Migadu-Flow: FLOW_IN ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=yhetil.org; s=key1; t=1631343979; h=from:from:sender:sender:reply-to:reply-to:subject:subject:date:date: message-id:message-id:to:to:cc:mime-version:mime-version: content-type:content-type:list-id:list-help:list-unsubscribe: list-subscribe:list-post:dkim-signature; bh=Y9W/aLvX47GjYumyJfdyuMr683kUkQ/4FZDt29m0qPw=; b=oHZoXfNkaJmM8BKDiqmWZL4DBtEYUKLinq9aqv+K+ufl2qe/mkMa1vpCaJmTtdbImBZj6t 0j5rzSHm+Q3uCP4ehoVyiguCuNyjtayDr3MESpmzjVNTwHB1nlkEQSeY/keiF53ShgX66T MSoUcPxCdGUUCEXqLEn23V0+7VuXOfguvrd7aWqG8dV5m+OYZmvGht54W5io5VI5sWMBYv JiGDldPPMsPJLrDeYpI+9vFN89B0VsgnOEurrt1V5YTk7gtHzrPCJdusC8pnJRHNMMhaTj +m0bo9CVuTgeTdwUN78gpAw1wrFAxans2v8/b2YjOEKlZ3FJVmGbRlV+/WDwhg== ARC-Seal: i=1; s=key1; d=yhetil.org; t=1631343979; a=rsa-sha256; cv=none; b=IP/mZ1Xiw9KKNVQ2GnJpVzO43SLf4C0M01QRXMpMJWiyNsOj/4I1CDxhGnslTDJ9TjUT5r 2f3fBJoGlNzojUrPf52zZdm03Sh/nFsFPm6wdHuLpnU394plFNNTalOdYoojJNw95wHQc/ ZSCFyE2nyJrgsybiSlKcU1Iuy+Utfp+mkQXBJRaXvdhdu/xU8Xq249nuQY5DKDQcFFkQ82 jew3Dl+DmKsGr7jy30qgknkcMYvNpwSuxE54YLwmQJQpFZoJFYMVTw094VODXlgcdDpfff Wbk5vBzHMTObAvS5170Q8mV+V6qdUpfVDfCxU9Oa0JaXh3lz/mSQ8vJJTB1f8Q== ARC-Authentication-Results: i=1; aspmx1.migadu.com; dkim=pass header.d=gmail.com header.s=20210112 header.b=AzAYyDsN; dmarc=pass (policy=none) header.from=gmail.com; spf=pass (aspmx1.migadu.com: domain of emacs-orgmode-bounces@gnu.org designates 209.51.188.17 as permitted sender) smtp.mailfrom=emacs-orgmode-bounces@gnu.org X-Migadu-Spam-Score: -3.11 Authentication-Results: aspmx1.migadu.com; dkim=pass header.d=gmail.com header.s=20210112 header.b=AzAYyDsN; dmarc=pass (policy=none) header.from=gmail.com; spf=pass (aspmx1.migadu.com: domain of emacs-orgmode-bounces@gnu.org designates 209.51.188.17 as permitted sender) smtp.mailfrom=emacs-orgmode-bounces@gnu.org X-Migadu-Queue-Id: 94A9223E3B X-Spam-Score: -3.11 X-Migadu-Scanner: scn0.migadu.com X-TUID: c0xHVbjKIrz5 --00000000000071693705cbb2dcae Content-Type: text/plain; charset="UTF-8" [PATCH] ob-tangle.el: Fix error in org-tangle from org-src edit buffer (org-babel-tangle) : Fix stringp error which happens when confirming successful tangle when `org-babel-tangle` is called from an org-src edit buffer. TINYCHANGE --- lisp/ob-tangle.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/ob-tangle.el b/lisp/ob-tangle.el index 2f60ef9a4..0768c8588 100644 --- a/lisp/ob-tangle.el +++ b/lisp/ob-tangle.el @@ -281,7 +281,10 @@ matching a regular expression." (if (= block-counter 1) "" "s") (file-name-nondirectory (buffer-file-name - (or (buffer-base-buffer) (current-buffer))))) + (or (buffer-base-buffer) + (current-buffer) + (and (org-src-edit-buffer-p) + (org-src-source-buffer)))))) ;; run `org-babel-post-tangle-hook' in all tangled files (when org-babel-post-tangle-hook (mapc -- 2.30.1 --00000000000071693705cbb2dcae Content-Type: text/html; charset="UTF-8" Content-Transfer-Encoding: quoted-printable
[PATCH] ob-tangle.el: Fix error in org-tangle from org-src= edit
=C2=A0buffer

(org-babel-tangle) : Fix stringp error which h= appens when confirming
successful tangle when `org-babel-tangle` is call= ed from an org-src edit
buffer.

TINYCHANGE
---
=C2=A0lisp/o= b-tangle.el | 5 ++++-
=C2=A01 file changed, 4 insertions(+), 1 deletion(= -)

diff --git a/lisp/ob-tangle.el b/lisp/ob-tangle.el
index 2f60e= f9a4..0768c8588 100644
--- a/lisp/ob-tangle.el
+++ b/lisp/ob-tangle.e= l
@@ -281,7 +281,10 @@ matching a regular expression."
=C2=A0 = (if (=3D block-counter 1) "" "s")
=C2=A0 (file-nam= e-nondirectory
=C2=A0 =C2=A0(buffer-file-name
- =C2=A0 (or (buffe= r-base-buffer) (current-buffer)))))
+ =C2=A0 (or (buffer-base-buffer)<= br>+ =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 (current-buffer)
+ =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 (and (org-src-edit-buffer-p)
+ =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0(org-src-source-buffer))))))
=C2=A0 ;; run `org-babel-p= ost-tangle-hook' in all tangled files
=C2=A0 (when org-babel-post-ta= ngle-hook
=C2=A0 =C2=A0(mapc
--
2.30.1


--00000000000071693705cbb2dcae--