ndwarshuis
/
emacs-config
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

FIX typos

This commit is contained in:
Nathan Dwarshuis 2021-12-29 00:32:48 -05:00
parent 025901509f
commit dd56b50962
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
local/lib/org-x/org-x.el
View File

@ -1564,7 +1564,7 @@ ARG and INTERACTIVE are passed to `org-store-link'."
(org-ml-timestamp-get-start-time) (org-ml-timestamp-get-start-time)
(org-ml-time-to-unixtime) (org-ml-time-to-unixtime)
(< (float-time))))) (< (float-time)))))
(->> (org-x-parse-file-headlines org-x-daily-plan-file 'all) (->> (org-x-parse-file-headlines (org-x-get-daily-plan-file) 'all)
(--filter (null (org-ml-headline-get-subheadlines it))) (--filter (null (org-ml-headline-get-subheadlines it)))
(-filter #'is-future) (-filter #'is-future)
(-map #'org-ml-remove-parents)))) (-map #'org-ml-remove-parents))))
@ -1594,7 +1594,7 @@ ARG and INTERACTIVE are passed to `org-store-link'."
;; ASSUME there will be one paragraph at the end holding ;; ASSUME there will be one paragraph at the end holding
;; the timestamp ;; the timestamp
(para (car (org-ml-match '(:last section paragraph) target)))) (para (car (org-ml-match '(:last section paragraph) target))))
(org-x-with-file org-x-daily-plan-file (org-x-with-file (org-x-get-daily-plan-file)
(org-ml~update* nil (org-ml~update* nil
(org-ml-map-children* (-snoc it link) it) (org-ml-map-children* (-snoc it link) it)
para)) para))