From mboxrd@z Thu Jan 1 00:00:00 1970 From: Greg Minshall Subject: Re: non-space, paste, (???) character for inline results Date: Wed, 31 Jan 2018 23:11:37 +0530 Message-ID: <4143.1517420497@minshall-apollo.minshall.org> References: <87a7wuypa1.fsf@nicolasgoaziou.fr> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:44815) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1egwOF-0006qy-QI for emacs-orgmode@gnu.org; Wed, 31 Jan 2018 12:41:44 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1egwOC-0001Mm-Bu for emacs-orgmode@gnu.org; Wed, 31 Jan 2018 12:41:43 -0500 Received: from relay01.pair.com ([209.68.5.15]:45145) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1egwOC-0001MN-5C for emacs-orgmode@gnu.org; Wed, 31 Jan 2018 12:41:40 -0500 In-reply-to: Your message of "Wed\, 31 Jan 2018 17\:19\:18 +0100." <87a7wuypa1.fsf@nicolasgoaziou.fr> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: "Emacs-orgmode" To: Nicolas Goaziou Cc: Org Mode List --=-=-= Content-Type: text/plain Nico, > I meant zero-width space, not non-breaking space. Note that it can be > used in other places to escape special characters, e.g., verbatim > markup. ah. how does one enter a zero-width space in emacs/org-mode? also, i'm curious about how it looks on the screen. (for me, i'd want it to look, on the screen, *very* obvious that *something* is there.) i also apologize that the patch i sent before is incomplete -- i forgot to modify a bit of "src_" processing; a new attempt is below. (not sure if that format is suitable.) cheers, Greg ---- --=-=-= Content-Type: text/x-diff Content-Disposition: attachment; filename=0001-use-as-a-paste-character-for-call_-and-src_-2.patch >From e0337aabb13fabcefbb0a9fd65e8d4c9bcd412ee Mon Sep 17 00:00:00 2001 From: Greg Minshall Date: Wed, 31 Jan 2018 20:38:35 +0530 Subject: [PATCH 1/2] use '#' as a "paste" character (for call_ and src_) --- lisp/org-element.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/lisp/org-element.el b/lisp/org-element.el index 5af2d6e..5fc3b2d 100644 --- a/lisp/org-element.el +++ b/lisp/org-element.el @@ -162,7 +162,7 @@ specially in `org-element--object-lex'.") "\\\\\\(?:[a-zA-Z[(]\\|\\\\[ \t]*$\\|_ +\\)" ;; Objects starting with raw text: inline Babel ;; source block, inline Babel call. - "\\(?:call\\|src\\)_")) + "#?\\(?:call\\|src\\)_")) "\\|"))) (org-element--set-regexps) @@ -2878,7 +2878,7 @@ Assume point is at the beginning of the babel call." (save-excursion (catch :no-object (when (let ((case-fold-search nil)) - (looking-at "call_\\([^ \t\n[(]+\\)[([]")) + (looking-at "#?\\From b032d0860431ff29e7136145605d4f3d981d5301 Mon Sep 17 00:00:00 2001 From: Greg Minshall Date: Wed, 31 Jan 2018 22:53:06 +0530 Subject: [PATCH 2/2] oops, forgot (looking-at .*src_...) --- lisp/org-element.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/org-element.el b/lisp/org-element.el index 5fc3b2d..7f70f4a 100644 --- a/lisp/org-element.el +++ b/lisp/org-element.el @@ -2932,7 +2932,7 @@ Assume point is at the beginning of the inline src block." (save-excursion (catch :no-object (when (let ((case-fold-search nil)) - (looking-at "src_\\([^ \t\n[{]+\\)[{[]")) + (looking-at "#?\\