summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorKyle Meyer <kyle@kyleam.com>2017-02-08 23:36:49 -0500
committerKyle Meyer <kyle@kyleam.com>2017-02-08 23:36:49 -0500
commitb641c9c0a0b97a217ad29898482e1b4cb6bc6cbd (patch)
tree3b218d5db71a2a9e0c809a2dcee072a6e377e569 /lisp
parent91e6764106b5bcd5f82f25a4b69cab341bd70b63 (diff)
downloademacs.d-b641c9c0a0b97a217ad29898482e1b4cb6bc6cbd.tar.gz
org-sort-heading-ignoring-articles: Ignore heading priority
Diffstat (limited to 'lisp')
-rw-r--r--lisp/km-org.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/km-org.el b/lisp/km-org.el
index f51fc4e..919f0cd 100644
--- a/lisp/km-org.el
+++ b/lisp/km-org.el
@@ -244,7 +244,7 @@ See `km/org-maybe-sort' for details of property value format."
"Sort alphabetically, but ignore any leading articles."
(let* ((ignored-words '("a" "an" "the"))
(heading (org-no-properties
- (org-get-heading 'no-tags 'no-todo)))
+ (org-get-heading 'no-tags 'no-todo 'no-priority)))
(heading-words (split-string heading)))
(when (member (downcase (car heading-words))
ignored-words)