Subject: Bug: org-agenda-refile does not update CATEGORY [9.1.9 (release_9.1.9-65-g5e4542 @ /Applications/Emacs.app/Contents/Resources/lisp/org/)]
From: Kent Primrose <pri3547@S290700.i-did-not-set--mail-host-address--so-tickle-me>
--text follows this line--
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
https://orgmode.org/manual/Feedback.html#Feedback
Your bug report will be posted to the Org mailing list.
------------------------------------------------------------------------
org-agenda-prefix-format uses %T to show the CATEGORY or filename. When
refiling via org-agenda-refile, the CATEGORY (or filename) is not
changed. The original category (such as "CAP" for items from
capture.org) remains. This also remains if I regenerate the org agenda,
and even if I kill the org agenda buffer and regenerate. On restarting
emacs, the correct CATEGORY information is displayed in the org agenda.
Emacs : GNU Emacs 26.3 (build 1, x86_64-apple-darwin18.2.0, NS appkit-1671.20 Version 10.14.3 (Build 18D109))
of 2019-09-02
Package: Org mode version 9.1.9 (release_9.1.9-65-g5e4542 @ /Applications/Emacs.app/Contents/Resources/lisp/org/)
current state:
==============
(setq
org-src-mode-hook '(org-src-babel-configure-edit-buffer
org-src-mode-configure-edit-buffer)
org-after-todo-state-change-hook '(org-clock-out-if-current)
org-use-fast-tag-selection t
org-agenda-tags-column -80
org-agenda-skip-scheduled-if-deadline-is-shown t
org-metadown-hook '(org-babel-pop-to-session-maybe)
org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
org-refile-targets '((org-agenda-files :maxlevel . 1)
(org-agenda-files :tag . "PROJ")
(org-agenda-files :tag . "DELG"))
org-enforce-todo-dependencies t
org-agenda-files '("~/org-local" "~/org-local/archive" "~/org-shared"
"~/org-shared/archive" "~/org-shared/brain")
org-tag-alist '((:startgroup) ("@wrk" . 119) ("@hom" . 104) ("@out" . 111)
("@net" . 110) ("@cmp" . 99) ("@pho" . 112) ("@eml" . 109)
("@del" . 100) ("PROJ" . 106) (:endgroup))
org-reveal-start-hook '(org-decrypt-entry)
org-modules '(org-w3m org-bbdb org-bibtex org-docview org-gnus org-info org-irc
org-mhe org-rmail org-habit)
org-blocker-hook '(org-block-todo-from-checkboxes
org-block-todo-from-children-or-siblings-or-parent)
org-journal-date-prefix "#+STARTUP: overview\n#+FILETAGS: JRNL\n#+TITLE: "
org-log-buffer-setup-hook '(evil-insert-state)
org-archive-location "archive/%s_archive::"
org-mode-hook '(#[0 "\300\301\302\303\304$\207"
[add-hook change-major-mode-hook org-show-block-all append
local]
5]
#[0 "\300\301\302\303\304$\207"
[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-journal-update-auto-mode-alist)
org-outline-path-complete-in-steps nil
org-archive-hook '(org-attach-archive-delete-maybe)
org-agenda-use-time-grid nil
org-confirm-elisp-link-function 'yes-or-no-p
org-startup-indented t
org-reverse-note-order t
org-journal-mode-hook '(#[0 "\301 \302\303\304$\207"
[org-journal-encrypt-on add-hook
org-journal-encryption-hook nil t]
5]
(lambda nil
(add-hook org-journal-encrypt-on
(quote org-journal-encryption-hook) nil t)
)
)
org-agenda-before-write-hook '(org-agenda-add-entry-text)
org-metaup-hook '(org-babel-load-in-session-maybe)
org-bibtex-headline-format-function #[257 "\300\236A\207" [:title] 3 "\n\n(fn ENTRY)"]
org-babel-pre-tangle-hook '(save-buffer)
org-tab-first-hook '(org-babel-hide-result-toggle-maybe
org-babel-header-arg-expand)
org-hide-leading-stars t
org-log-done 'time
org-journal-date-format "%Y/%m/%d - %A"
org-agenda-follow-indirect t
org-agenda-ignore-properties '(effort appt category)
org-startup-align-all-tables t
org-ellipsis "⤵"
org-agenda-remove-tags t
org-list-demote-modify-bullet '(("-" . "+") ("*" . "+") ("+" . "-") ("1." . "-")
("1)" . "-"))
org-agenda-span 7
org-fast-tag-selection-single-key t
org-catch-invisible-edits 'show-and-error
org-habit-show-habits-only-for-today nil
org-agenda-prefix-format '((agenda . " %-7c%-5 T%?-8t ")
(todo . " %-5 T%-7c%?-8t ")
(tags . " %-5 T%-7c%?-8t ") (timeline . " %s %t ")
(search . " %i %-12:c "))
org-occur-hook '(org-first-headline-recenter)
org-agenda-mode-hook '(org-journal-update-org-agenda-files)
org-agenda-start-with-log-mode t
org-cycle-separator-lines 0
org-agenda-window-setup 'current-window
org-enforce-todo-checkbox-dependencies t
org-agenda-include-diary 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-todo-keywords '((sequence "TODO(t)" "WAIT(w@/!)" "|" "DONE(d)" "CNCL(x@/!)")
(sequence "STEP(s)" "NEXT(n)" "|" "DONE(d)" "CNCL(x@/!)"))
org-speed-command-hook '(org-speed-command-activate
org-babel-speed-command-activate)
org-tags-column -80
org-capture-mode-hook '(evil-insert-state)
org-journal-time-prefix "\n** "
org-M-RET-may-split-line '((default))
org-default-priority 0
org-journal-dir "~/org-shared/journal/"
org-refile-allow-creating-parent-nodes 'confirm
org-refile-use-outline-path 'file
org-confirm-shell-link-function 'yes-or-no-p
org-stuck-projects '("PROJ+LEVEL=2/-DONE" ("NEXT" "TODO"))
org-link-parameters '(("id" :follow org-id-open)
("rmail" :follow org-rmail-open :store org-rmail-store-link)
("mhe" :follow org-mhe-open :store org-mhe-store-link)
("irc" :follow org-irc-visit :store org-irc-store-link)
("info" :follow org-info-open :export org-info-export
:store org-info-store-link)
("gnus" :follow org-gnus-open :store org-gnus-store-link)
("docview" :follow org-docview-open :export
org-docview-export :store org-docview-store-link)
("bibtex" :follow org-bibtex-open :store
org-bibtex-store-link)
("bbdb" :follow org-bbdb-open :export org-bbdb-export
:complete org-bbdb-complete-link :store
org-bbdb-store-link)
("w3m" :store org-w3m-store-link) ("file+sys")
("file+emacs")
("elfeed" :follow elfeed-link-open :store
elfeed-link-store-link)
("doi" :follow org--open-doi-link)
("elisp" :follow org--open-elisp-link)
("file" :complete org-file-complete-link)
("ftp" :follow
(lambda (path) (browse-url (concat "ftp:" path))))
("help" :follow org--open-help-link)
("http" :follow
(lambda (path) (browse-url (concat "http:" path))))
("https" :follow
(lambda (path) (browse-url (concat "https:" path))))
("mailto" :follow
(lambda (path) (browse-url (concat "mailto:" path))))
("news" :follow
(lambda (path) (browse-url (concat "news:" path))))
("shell" :follow org--open-shell-link))
org-read-date-prefer-future nil
org-agenda-block-separator nil
org-capture-templates '(("t" "Todo" entry
(file+headline org-default-notes-file "Tasks")
"* TODO %^{Description}\n CREATED: %U %?")
("a" "Appointment" entry
(file+headline org-default-notes-file "Appointments")
"* %^{Description} @%^{Location}\n %^{When}T CREATED: %U %?")
("p" "Project" entry
(file+headline org-default-notes-file "Projects")
"* %^{Description} [/] :PROJ:\n CREATED: %U %?")
("n" "Note" entry
(file+headline org-default-notes-file "Notes")
"* %^{Description}\n CREATED: %U %?")
("i" "Idea" entry
(file+headline org-default-notes-file "Ideas")
"* %^{Description}\n CREATED: %U %?")
)
org-treat-S-cursor-todo-selection-as-state-change nil
org-todo-keyword-faces '(("TODO" :foreground "Green" :weight bold)
("STEP" :foreground "LightBlue" :weight bold)
("NEXT" :foreground "Blue" :weight bold)
("WAIT" :foreground "Yellow" :weight bold)
("DONE" :foreground "ForestGreen" :weight bold)
("CNCL" :foreground "Red" :weight bold))
org-journal-file-format "%Y%m%d.org"
org-agenda-compact-blocks t
org-agenda-custom-commands '(("g" . "GTD contexts")
("gw" "Work" tags-todo "@wrk"
((org-agenda-overriding-header "Work:")))
("gh" "Home" tags-todo "@hom"
((org-agenda-overriding-header "Home:")))
("go" "Out" tags-todo "@out"
((org-agenda-overriding-header "Out:")))
("gn" "Internet" tags-todo "@net"
((org-agenda-overriding-header "Internet:")))
("gc" "Computer" tags-todo "@cmp"
((org-agenda-overriding-header "Computer:")))
("gp" "Phone" tags-todo "@pho"
((org-agenda-overriding-header "Phone:")))
("gm" "Email" tags-todo "@eml"
((org-agenda-overriding-header "Email:")))
("gd" "Delegated" tags-todo "@del"
((org-agenda-overriding-header "Delegated:")))
("gj" "Projects" tags-todo "PROJ"
((org-agenda-overriding-header "Projects:")))
("gi" "Idea" tags "IDEA+LEVEL=2"
((org-agenda-overriding-header "Idea:")))
("ga" "All contexts"
((tags-todo "@wrk"
((org-agenda-overriding-header "Work:")))
(tags-todo "@hom"
((org-agenda-overriding-header "Home:")))
(tags-todo "@out"
((org-agenda-overriding-header "Out:")))
(tags-todo "@net"
((org-agenda-overriding-header "Internet:")))
(tags-todo "@cmp"
((org-agenda-overriding-header "Computer:")))
(tags-todo "@pho"
((org-agenda-overriding-header "Phone:")))
(tags-todo "@eml"
((org-agenda-overriding-header "Email:")))
(tags-todo "@del"
((org-agenda-overriding-header "Delegated:")))
(tags-todo "PROJ"
((org-agenda-overriding-header "Projects:")))
(tags "IDEA+LEVEL=2"
((org-agenda-overriding-header "Idea:")))
)
)
("d" "Daily Agenda"
((agenda ""
((org-agenda-span (quote day))
(org-agenda-ndays 1)
(org-agenda-start-on-weekday nil)
(org-agenda-start-day "+0d")
(org-agenda-todo-ignore-deadlines nil)
(org-deadline-warning-days 7)
(org-agenda-skip-deadline-if-done t)
(org-agenda-use-time-grid t)
(org-use-tag-inheritance t))
)
(tags-todo
"-PROJ-STYLE=\"habit\"-PRIORITY=\"A\"-PRIORITY=\"B\"-PRIORITY=\"C\"/!+NEXT|+TODO|+WAIT"
((org-agenda-overriding-header
"Open Tasks: =======================================================")
(org-use-tag-inheritance t)
)
)
(tags-todo "PRIORITY=\"A\""
((org-agenda-overriding-header
"Top Priority Tasks: ===============================================")
)
)
(tags-todo "PRIORITY=\"B\""
((org-agenda-overriding-header
"Lower Priority Tasks: =============================================")
)
)
(tags-todo "PROJ"
((org-agenda-overriding-header
"Projects: =========================================================")
(org-use-tag-inheritance t))
)
)
)
("h" "Habits"
((tags "STYLE=\"habit\""
((org-agenda-overriding-header
"Habits: ===========================================================")
)
)
)
)
("r" . "Review")
("rw" "Weekly Review"
((agenda ""
((org-agenda-overriding-header "Agenda:")
(org-agenda-span (quote week))
(org-agenda-start-on-weekday 0)
(org-agenda-todo-ignore-deadlines nil)
(org-deadline-warning-days 7)
(org-use-tag-inheritance t))
)
)
)
("rm" "Monthly Review"
((agenda ""
((org-agenda-overriding-header "Agenda:")
(org-agenda-span (quote month))
(org-agenda-include-diary nil)
(org-agenda-todo-ignore-deadlines nil)
(org-deadline-warning-days 28)
(org-use-tag-inheritance t))
)
)
)
("rr" "Require attention"
((tags-todo
"-@wrk-@hom-@out-@net-@cmp-@pho-@eml-@del"
((org-agenda-overriding-header "Context:")
(org-use-tag-inheritance t))
)
(tags "REFILE+LEVEL>1"
((org-agenda-overriding-header "Refile:")
(org-use-tag-inheritance t))
)
(stuck ""
((org-agenda-overriding-header "Stuck:")
(org-use-tag-inheritance t))
)
(tags
(concat "-PROJ+TODO={DONE\\|CNCL}" "|"
"+PROJ+TODO={DONE\\|CNCL}+LEVEL<=2")
((org-agenda-overriding-header "Archive:")))
)
)
("p" "Planning"
((tags-todo
"-PROJ-STYLE=\"habit\"-PRIORITY=\"A\"-PRIORITY=\"B\"-PRIORITY=\"C\"/!+NEXT|+TODO|+WAIT"
((org-agenda-overriding-header
"Open Tasks: =======================================================")
)
)
(tags-todo "PRIORITY=\"A\""
((org-agenda-overriding-header
"Top Priority Tasks: ===============================================")
)
)
(tags-todo "PRIORITY=\"B\""
((org-agenda-overriding-header
"Lower Priority Tasks: =============================================")
)
)
(tags-todo "PRIORITY=\"C\""
((org-agenda-overriding-header
"Low Priority Tasks: ===============================================")
)
)
(tags "-ARCHIVE+PROJ+LEVEL=2"
((org-agenda-overriding-header
"Active Projects: ==================================================")
(org-use-tag-inheritance t))
)
(tags "IDEA+LEVEL=2-TODO={DONE}-TODO={CNCL}"
((org-agenda-overriding-header
"Someday/Maybe: ====================================================")
(org-use-tag-inheritance t))
)
(tags "STYLE=\"habit\""
((org-agenda-overriding-header
"Habits: ===========================================================")
)
)
)
)
("o" . "Old Reports")
("od" "Daily Review"
((agenda ""
((org-agenda-overriding-header "Due:")
(org-agenda-entry-types
(\` (:scheduled :deadline :timestamp :sexp)))
(org-agenda-ndays 1)
(org-deadline-warning-days 7)
(org-agenda-skip-deadline-if-done t)
(org-use-tag-inheritance t))
)
(stuck ""
((org-agenda-overriding-header "Stuck:")
(org-use-tag-inheritance t))
)
(tags "IDEA+LEVEL=2-TODO={DONE}-TODO={CNCL}"
((org-agenda-overriding-header "Someday/Maybe:")
(org-use-tag-inheritance t))
)
)
)
("ow" "Weekly Review" agenda ""
((org-agenda-overriding-header "Week in Review")
(org-agenda-span (quote week))
(org-agenda-start-on-weekday 0)
(org-agenda-show-all-dates t)
(org-agenda-start-with-log-mode t)
(org-agenda-archives-mode t))
)
("x" . "Special Reports")
("xn" "Now Due" agenda ""
((org-agenda-overriding-header "Now Due:")
(org-agenda-ndays 1) (org-deadline-warning-days 0)
(org-use-tag-inheritance t))
)
("xp" "Projects" tags "PROJ+LEVEL=2"
((org-agenda-overriding-header "Projects:")
(org-use-tag-inheritance t)
(org-agenda-prefix-format " %-4:c %s"))
)
("xa" "All Open Actions" alltodo ""
((org-agenda-overriding-header "Open Actions:")
(org-use-tag-inheritance t)
(org-agenda-skip-function
(\`
(org-agenda-skip-entry-if (quote todo)
(\` ("DONE" "CNCL")))
)
)
)
)
("xx" "Next Actions" tags
"+TODO={TODO\\|NEXT\\|WAIT}"
((org-agenda-overriding-header "Next Actions:")
(org-use-tag-inheritance nil)
(org-agenda-prefix-format " %-7:c %s"))
)
("xw" "Waiting" tags "+TODO={WAIT}"
((org-agenda-overriding-header "Waiting Tasks:")
(org-use-tag-inheritance nil))
)
("x?" "Maybe" tags
"IDEA+LEVEL=2-TODO={DONE}-TODO={CNCL}"
((org-agenda-overriding-header "Someday/Maybe:")
(org-use-tag-inheritance nil)
(org-agenda-prefix-format " %-7:c %s"))
)
("xs" "Scheduled" agenda ""
((org-agenda-overriding-header "Scheduled Tasks:")
(org-agenda-entry-types (\` (:scheduled)))
(org-agenda-ndays 30)
(org-deadline-warning-days 0)
(org-agenda-skip-scheduled-if-done t)
(org-use-tag-inheritance t)
(org-agenda-include-diary nil))
)
("xd" "Deadlines" agenda ""
((org-agenda-overriding-header "Deadlines:")
(org-agenda-entry-types (\` (:deadline)))
(org-agenda-ndays 30)
(org-deadline-warning-days 0)
(org-agenda-skip-deadline-if-done t)
(org-use-tag-inheritance t)
(org-agenda-include-diary nil))
)
)
org-agenda-sorting-strategy '((agenda habit-down time-up priority-down
category-keep tag-down)
(todo priority-down category-keep)
(tags priority-down category-keep)
(search category-keep))
org-agenda-skip-deadline-if-done t
org-agenda-inhibit-startup t
org-agenda-start-on-weekday nil
org-default-notes-file "~/org-shared/capture.org"
)