emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: Samuel Wales <samologist@gmail.com>
To: Mirko Vukovic <mirko.vukovic@gmail.com>
Cc: "emacs-orgmode@gnu.org" <emacs-orgmode@gnu.org>
Subject: Re: How to generate a list of ``who-links''?
Date: Sun, 14 Oct 2018 15:08:48 -0700	[thread overview]
Message-ID: <CAJcAo8tLRiceseupcQQZcLWCCRu91+-zJ5FzKtpqoVqKuqQG2A@mail.gmail.com> (raw)
In-Reply-To: <CAO73BABpKsaS0CtyG-=it=vJCN7E2E-ah+3vGrcSzUbbXusBYg@mail.gmail.com>

this is good eonugh for me but perhaps you want to improve on it.

(define-key org-mode-map (kbd "C-c w") 'alpha-org-what-links-here)
(defun alpha-org-what-links-here ()
  "Show all links that point to the current node.
Possibly also show the target node itself.

  - fixme Bug in Org: g in agenda removes entries
  - fixme org text search does not work in non-org-mode files or
    in org files text above the outline tree ka

This makes id links quasi-bidirectional.
"
  (interactive)
  (let ((org-agenda-files (alpha-org-all-org-files))

        org-agenda-skip-comment-trees
        org-agenda-skip-archived-trees

        (search-string (or
                        ;; raw id so it will pick up target
                        (alpha-awhen (org-entry-get nil "ID" t)
                          (regexp-quote it))
                        (concat "{\\("
                                ;; tries searching a link to id
                                ;; not sure if useful
                                (regexp-quote (org-store-link nil))
                                "\\|\\<"
                                ;; not sure if useful
                                (regexp-quote (org-get-heading))
                                "\\>\\)}"))))
    (org-search-view nil search-string)))

On 10/14/18, Mirko Vukovic <mirko.vukovic@gmail.com> wrote:
> Hello,
>
> I am looking for a way to get a list of all remote references to the
> current node?
>
> Currently, I do:
> - org-id-copy
> - In org-agenda I search the copied id.
>
> Is there
> - a better built-in way?
> - a contributed-package?
> - a suggestion how to code it in my elisp?
>
> Thanks,
>
> Mirko
>


-- 
The Kafka Pandemic: <http://thekafkapandemic.blogspot.com>

The disease DOES progress. MANY people have died from it. And ANYBODY
can get it at any time.

"You’ve really gotta quit this and get moving, because this is murder
by neglect." ---
<http://www.meaction.net/2017/02/03/pwme-people-with-me-are-being-murdered-by-neglect>.

      reply	other threads:[~2018-10-14 22:08 UTC|newest]

Thread overview: 2+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2018-10-14 15:22 How to generate a list of ``who-links''? Mirko Vukovic
2018-10-14 22:08 ` Samuel Wales [this message]

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.orgmode.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=CAJcAo8tLRiceseupcQQZcLWCCRu91+-zJ5FzKtpqoVqKuqQG2A@mail.gmail.com \
    --to=samologist@gmail.com \
    --cc=emacs-orgmode@gnu.org \
    --cc=mirko.vukovic@gmail.com \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).