From: Dave Abrahams <dave@boostpro.com>
To: emacs-orgmode@gnu.org
Subject: Bug: stored link description craziness [7.9.2 (release_7.9.2-609-g853125 @ /Users/dave/.emacs.d/el-get/org-mode/lisp/)]
Date: Sat, 27 Oct 2012 18:09:30 -0400 [thread overview]
Message-ID: <m2zk37lg85.fsf@pluto.luannocracy.com> (raw)
Remember to cover the basics, that is, what you expected to happen and
what in fact did happen. You don't know how to make a good report? See
http://orgmode.org/manual/Feedback.html#Feedback
Your bug report will be posted to the Org-mode mailing list.
------------------------------------------------------------------------
Go to the headline in the following org-snippet and do `M-x
org-store-link RET'. Then, anywhere, do `M-x org-insert-link RET RET'.
The result is a link whose visible description is
"{{org-mode.org}{org-mode}}". IMO, it should be simply "org-mode".
--8<---------------cut here---------------start------------->8---
* [[org-mode.org][org-mode]]
:PROPERTIES:
:ID: 35D50B60-F339-4B08-B8C3-FA0CA0D861A3
:END:
--8<---------------cut here---------------end--------------->8---
Emacs : GNU Emacs 24.2.1 (x86_64-apple-darwin11.4.2, Carbon Version 1.6.0 AppKit 1138.51)
of 2012-10-26 on pluto.luannocracy.com
Package: Org-mode version 7.9.2 (release_7.9.2-609-g853125 @ /Users/dave/.emacs.d/el-get/org-mode/lisp/)
current state:
==============
(setq
org-hide-leading-stars t
org-export-babel-evaluate nil
org-export-preprocess-before-selecting-backend-code-hook '(org-beamer-select-beamer-code)
org-tab-first-hook '(yas/org-very-safe-expand org-hide-block-toggle-maybe org-src-native-tab-command-maybe
org-babel-hide-result-toggle-maybe org-babel-header-arg-expand)
org-adapt-indentation nil
org-footnote-section nil
org-time-clocksum-use-fractional t
org-log-buffer-setup-hook '((lambda nil (setq fill-column (- fill-column 5))))
org-habit-preceding-days 42
org-speed-command-hook '(org-speed-command-default-hook org-babel-speed-command-hook)
org-agenda-fontify-priorities t
org-reverse-note-order t
org-agenda-auto-exclude-function 'org-my-auto-exclude-function
org-occur-hook '(org-first-headline-recenter)
org-metaup-hook '(org-babel-load-in-session-maybe)
org-agenda-scheduled-leaders '("" "S%d: ")
org-agenda-start-on-weekday nil
org-clock-into-drawer "LOGBOOK"
org-export-preprocess-before-normalizing-links-hook '(org-remove-file-link-modifiers)
org-clock-mode-line-total 'current
org-confirm-shell-link-function nil
org-id-link-to-org-use-id 'create-if-interactive-and-no-custom-id
org-x-backends '(ox-org ox-redmine)
org-finalize-agenda-hook '(org-agenda-add-overlays)
org-speed-commands-user '(("+" . org-priority-up) ("-" . org-priority-down) (":" . org-set-tags))
org-clock-idle-time 10
org-export-latex-final-hook '(org-beamer-amend-header org-beamer-fix-toc org-beamer-auto-fragile-frames
org-beamer-place-default-actions-for-lists)
org-habit-completed-glyph 10004
org-agenda-restore-windows-after-quit t
org-file-apps '(("\\.pptx?\\'" . "open %s") (auto-mode . emacs) ("\\.mm\\'" . default) ("\\.x?html?\\'" . default)
("\\.pdf\\'" . default))
org-agenda-deadline-leaders '("D: " "D%d: ")
org-pretty-entities t
org-special-ctrl-a/e 'reversed
org-export-latex-after-initial-vars-hook '(org-beamer-after-initial-vars)
org-x-redmine-title-prefix-function 'org-x-redmine-title-prefix
org-agenda-prefix-format '((agenda . " %-11:c%?-12t% s") (timeline . " % s") (todo . " %-11:c")
(tags . " %-11:c"))
org-agenda-skip-scheduled-if-done t
org-agenda-custom-commands '(("E" "Errands (next 3 days)" tags
"Errand&TODO<>\"DONE\"&TODO<>\"CANCELED\"&STYLE<>\"habit\"&SCHEDULED<\"<+3d>\""
((org-agenda-overriding-header "Errands (next 3 days)")))
("A" "Priority #A tasks" agenda ""
((org-agenda-ndays 1) (org-agenda-overriding-header "Today's priority #A tasks: ")
(org-agenda-skip-function
(quote (org-agenda-skip-entry-if (quote notregexp) "\\=.*\\[#A\\]")))
)
)
("b" "Priority #A and #B tasks" agenda ""
((org-agenda-ndays 1)
(org-agenda-overriding-header "Today's priority #A and #B tasks: ")
(org-agenda-skip-function
(quote (org-agenda-skip-entry-if (quote regexp) "\\=.*\\[#C\\]")))
)
)
("w" "Waiting/delegated tasks" tags "TODO=\"WAITING\"|TODO=\"DELEGATED\""
((org-agenda-overriding-header "Waiting/delegated tasks:")
(org-agenda-sorting-strategy (quote (todo-state-up priority-down category-up))))
)
("p" "Unprioritized tasks" tags
"AREA<>\"Work\"&TODO<>\"\"&TODO<>{DONE\\|CANCELED\\|NOTE\\|PROJECT\\|DEFERRED\\|SOMEDAY}"
((org-agenda-files
(quote
("~/Documents/Tasks/todo.txt")
)
)
(org-agenda-overriding-header "Unprioritized tasks: ")
(org-agenda-skip-function
(quote
(org-agenda-skip-entry-if
(quote regexp)
"\\=.*\\[#[A-Z]\\]")
)
)
)
)
("u" "Unscheduled tasks" tags
"AREA<>\"Work\"&TODO<>\"\"&TODO<>{DONE\\|CANCELED\\|NOTE\\|PROJECT}"
((org-agenda-files (quote ("~/Documents/Tasks/todo.txt")))
(org-agenda-overriding-header "Unscheduled tasks: ")
(org-agenda-skip-function
(quote
(org-agenda-skip-entry-if (quote scheduled) (quote deadline) (quote timestamp)
(quote regexp) "\\* \\(DEFERRED\\|SOMEDAY\\)")
)
)
(org-agenda-sorting-strategy (quote (priority-down))))
)
("U" "Deferred tasks" tags "TODO=\"DEFERRED\""
((org-agenda-files (quote ("~/Documents/Tasks/todo.txt")))
(org-agenda-overriding-header "Deferred tasks:"))
)
("Y" "Someday tasks" tags "TODO=\"SOMEDAY\""
((org-agenda-overriding-header "Someday tasks:")))
("G" "Ledger tasks (all)" alltodo ""
((org-agenda-files (quote ("~/src/ledger/plan/TODO")))
(org-agenda-overriding-header "Ledger tasks:")
(org-agenda-sorting-strategy (quote (todo-state-up priority-down category-up))))
)
("N" "Ledger tasks (all, alphabetical)" alltodo ""
((org-agenda-files (quote ("~/src/ledger/plan/TODO")))
(org-agenda-overriding-header "Ledger tasks, alphabetical:")
(org-agenda-sorting-strategy (quote (alpha-up))))
)
("l" "Ledger tasks" tags-todo "TODO<>{SOMEDAY\\|DEFERRED}"
((org-agenda-files (quote ("~/src/ledger/plan/TODO")))
(org-agenda-overriding-header "Ledger tasks:")
(org-agenda-sorting-strategy (quote (todo-state-up priority-down category-up)))
(org-agenda-skip-function
(quote (org-agenda-skip-entry-if (quote regexp) "\\=.*\\[#C\\]")))
)
)
("r" "Uncategorized items" tags
"CATEGORY=\"Inbox ===>\"&LEVEL=2&TODO<>{DONE\\|CANCELED\\|NOTE\\|PROJECT}"
((org-agenda-overriding-header "Uncategorized items")))
("V" "Unscheduled work-related tasks" tags
"AREA=\"Work\"&TODO<>\"\"&TODO<>{DONE\\|CANCELED\\|NOTE\\|PROJECT}"
((org-agenda-overriding-header "Unscheduled work-related tasks")
(org-agenda-files (quote ("~/Documents/Tasks/todo.txt")))
(org-agenda-sorting-strategy (quote (category-up)))
(org-agenda-skip-function
(quote
(org-agenda-skip-entry-if (quote scheduled) (quote deadline) (quote timestamp)
(quote regexp) "\\* \\(DEFERRED\\|SOMEDAY\\)")
)
)
)
)
("W" "Work-related tasks" tags
"AREA=\"Work\"&TODO<>\"\"&TODO<>{DONE\\|CANCELED\\|NOTE\\|PROJECT}"
((org-agenda-overriding-header "Work-related tasks")
(org-agenda-files (quote ("~/Documents/Tasks/todo.txt")))
(org-agenda-sorting-strategy
(quote (category-up priority-down todo-state-up alpha-up)))
(org-agenda-skip-function
(quote (org-agenda-skip-entry-if (quote regexp) "\\* \\(DEFERRED\\|SOMEDAY\\)")))
)
)
)
org-self-insert-cluster-for-undo t
org-return-follows-link t
org-default-notes-file "~/Documents/Tasks/todo.txt"
org-clock-in-resume t
org-agenda-include-diary t
org-agenda-export-html-style ""
org-drawers '("PROPERTIES" "CLOCK" "LOGBOOK" "OUT")
org-after-todo-state-change-hook '(org-clock-out-if-current org-checklist)
org-todo-repeat-to-state "TODO"
org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer)
org-tags-column -97
org-agenda-before-write-hook '(org-agenda-add-entry-text)
org-babel-pre-tangle-hook '(save-buffer)
org-mode-hook '((lambda nil (set (make-local-variable (quote yas/trigger-key)) [tab])
(add-to-list (quote org-tab-first-hook) (quote yas/org-very-safe-expand))
(define-key yas/keymap [tab] (quote yas/next-field)))
(lambda nil (local-unset-key (kbd ".,")))
#[nil "\300\301\302\303\304$\207"
[org-add-hook change-major-mode-hook org-show-block-all append local] 5]
#[nil "\300\301\302\303\304$\207"
[org-add-hook change-major-mode-hook org-babel-show-result-all append local] 5]
org-babel-result-hide-spec org-babel-hide-all-hashes)
org-agenda-follow-indirect t
org-refile-targets '((nil :todo . "PROJECT") (nil :maxlevel . 2))
org-extend-today-until 6
org-attach-method 'mv
org-mobile-pre-pull-hook '(my-org-convert-incoming-items)
org-use-speed-commands t
org-agenda-sorting-strategy '((agenda habit-down time-up todo-state-up priority-down category-keep)
(todo priority-down category-keep) (tags priority-down category-keep)
(search category-keep))
org-clock-persist 'history
org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point org-babel-execute-safely-maybe)
org-agenda-persistent-filter t
org-clock-in-switch-to-state "STARTED"
org-directory "~/Documents/Tasks/"
org-enforce-todo-dependencies t
org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers org-cycle-show-empty-lines
org-optimize-window-after-visibility-change)
org-habit-show-habits-only-for-today nil
org-export-latex-format-toc-function 'org-export-latex-format-toc-default
org-archive-location "TODO-archive::"
org-export-first-hook '(org-beamer-initialize-open-trackers)
org-agenda-finalize-hook '(org-agenda-add-overlays)
org-agenda-text-search-extra-files '(agenda-archives)
org-habit-today-glyph 9483
org-x-redmine-title-prefix-match-function 'org-x-redmine-title-prefix-match
org-agenda-default-appointment-duration 60
org-use-property-inheritance '("AREA")
org-modules '(org-id org-info org-habit)
org-agenda-ndays 1
org-checkbox-statistics-hook '(dwa/checkbox-list-complete)
org-fast-tag-selection-single-key 'expert
org-agenda-window-setup 'current-window
org-babel-tangle-lang-exts '(("python" . "py") ("emacs-lisp" . "el"))
org-confirm-elisp-link-function nil
org-edit-src-content-indentation 0
org-metadown-hook '(org-babel-pop-to-session-maybe)
org-log-into-drawer t
org-list-automatic-rules '((bullet . t) (checkbox . t) (indent . t))
org-insert-heading-respect-content t
org-agenda-skip-unavailable-files t
org-checklist-export-function 'org-export-as-ascii
org-default-priority 67
org-blocker-hook '(org-block-todo-from-children-or-siblings-or-parent)
org-agenda-skip-deadline-if-done t
org-structure-template-alist '(("s" "#+BEGIN_SRC ?\n\n#+END_SRC" "<src lang=\"?\">\n\n</src>")
("e" "#+BEGIN_EXAMPLE\n?\n#+END_EXAMPLE" "<example>\n?\n</example>")
("q" "#+BEGIN_QUOTE\n?\n#+END_QUOTE" "<quote>\n?\n</quote>")
("v" "#+BEGIN_VERSE\n?\n#+END_VERSE" "<verse>\n?\n</verse>")
("c" "#+BEGIN_CENTER\n?\n#+END_CENTER" "<center>\n?\n</center>")
("l" "#+BEGIN_LaTeX\n?\n#+END_LaTeX" "<literal style=\"latex\">\n?\n</literal>")
("L" "#+LaTeX: " "<literal style=\"latex\">?</literal>")
("h" "#+BEGIN_HTML\n?\n#+END_HTML" "<literal style=\"html\">\n?\n</literal>")
("H" "#+HTML: " "<literal style=\"html\">?</literal>")
("a" "#+BEGIN_ASCII\n?\n#+END_ASCII") ("A" "#+ASCII: ")
("i" "#+INDEX: ?" "#+INDEX: ?")
("I" "#+INCLUDE %file ?" "<include file=%file markup=\"?\">"))
org-completion-use-ido t
org-babel-load-languages '((emacs-lisp . t) (sh . t))
org-cycle-global-at-bob t
org-agenda-start-with-follow-mode t
org-agenda-mode-hook '((lambda nil (local-unset-key (kbd ".,"))))
org-agenda-files '("~/Documents/Tasks/todo.txt")
org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
org-archive-save-context-info '(time category itags)
org-src-fontify-natively t
org-clock-out-remove-zero-time-clocks t
org-refile-target-verify-function 'dwa/org-verify-refile-target
org-agenda-skip-scheduled-if-deadline-is-shown t
org-after-todo-statistics-hook '(dwa/org-summary-todo)
)
--
Dave Abrahams
BoostPro Computing Software Development Training
http://www.boostpro.com Clang/LLVM/EDG Compilers C++ Boost
next reply other threads:[~2012-10-27 22:09 UTC|newest]
Thread overview: 2+ messages / expand[flat|nested] mbox.gz Atom feed top
2012-10-27 22:09 Dave Abrahams [this message]
2012-12-22 18:40 ` Bug: stored link description craziness [7.9.2 (release_7.9.2-609-g853125 @ /Users/dave/.emacs.d/el-get/org-mode/lisp/)] Bastien
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=m2zk37lg85.fsf@pluto.luannocracy.com \
--to=dave@boostpro.com \
--cc=emacs-orgmode@gnu.org \
/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).