diff options
author | Leon Rische <leon.rische@me.com> | 2020-07-12 15:32:29 +0200 |
---|---|---|
committer | Leon Rische <leon.rische@me.com> | 2020-07-12 15:32:29 +0200 |
commit | bb5536ee54366ca9d56fdf6e65091c23902a9030 (patch) | |
tree | c27aa75c14df2e95265db820b732aed95643d817 /org-fc.el | |
parent | d810eb1149af2390daf994a795a299958bf288eb (diff) |
Add `org-fc-member-p` function
Diffstat (limited to 'org-fc.el')
-rw-r--r-- | org-fc.el | 8 |
1 files changed, 8 insertions, 0 deletions
@@ -270,6 +270,14 @@ Used to calculate the time needed for reviewing a card.") ;;; Helper Functions +(defun org-fc-member-p (path) + "Check if PATH is member of one of the `org-fc-directories'." + (setq path (expand-file-name path)) + (and (string= (file-name-extension file) "org") + (cl-some + (lambda (dir) (string-prefix-p (expand-file-name dir) path)) + org-fc-directories))) + (defun org-fc-noop () "Noop-function.") |