Re: [O] [PATCH] org-store-link: Fixed a bug where source block edit buffers were not recognized

[Shaun Johnson]

On 08/03/2012 22:33, Ilya Shlyakhter wrote:
> attached.

Having just run into this same problem (being unable to create
and store a code reference link using C-l in a source block edit
buffer) I would like to second the inclusion of this or an
equivalent patch. Ilya's patch can be seen on the patchwork server
at:
  http://patchwork.newartisans.com/patch/1209/

I am currently using the following patch to work around this
problem:

diff --git a/lisp/org.el b/lisp/org.el
index ad63213..4a97cc9 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -8684,7 +8684,7 @@ For file links, arg negates `org-context-in-file-links'."
        (setq link (plist-get org-store-link-plist :link)
             desc (or (plist-get org-store-link-plist :description) link)))

-      ((equal (buffer-name) "*Org Edit Src Example*")
+      ((org-bound-and-true-p org-edit-src-from-org-mode)
        (let (label gc)
         (while (or (not label)
                    (save-excursion

Shaun Johnson.