Skip to content

Commit 1d944fe

Browse files
committed
Allow additional-options in more places
1 parent 89092b5 commit 1d944fe

File tree

1 file changed

+14
-7
lines changed

1 file changed

+14
-7
lines changed

org-projectile.el

Lines changed: 14 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -348,8 +348,11 @@ location of the filepath cache."
348348

349349
(defvar dired-buffers)
350350

351-
(defun org-projectile:capture-for-project (project-name &optional capture-template)
352-
(org-capture-set-plist (org-projectile:project-todo-entry nil capture-template))
351+
(defun org-projectile:capture-for-project
352+
(project-name &optional capture-template &rest additional-options)
353+
(org-capture-set-plist
354+
(apply #'org-projectile:project-todo-entry
355+
nil capture-template nil additional-options))
353356
;; TODO: super gross that this had to be copied from org-capture,
354357
;; Unfortunately, it does not seem to be possible to call into org-capture
355358
;; because it makes assumptions that make it impossible to set things up
@@ -522,25 +525,29 @@ as the capture template."
522525
(user-error "%s" "This command is only available to helm users. Install helm and try again.")))
523526

524527
;;;###autoload
525-
(defun org-projectile:project-todo-completing-read (&optional capture-template)
528+
(defun org-projectile:project-todo-completing-read
529+
(&optional capture-template &rest additional-options)
526530
"Select a project using a `projectile-completing-read' and record a TODO.
527531
528532
If CAPTURE-TEMPLATE is provided use it as the capture template for the TODO."
529533
(interactive)
530-
(org-projectile:capture-for-project
534+
(apply
535+
#'org-projectile:capture-for-project
531536
(projectile-completing-read "Record TODO for project: "
532537
(org-projectile:known-projects))
533-
capture-template))
538+
capture-template additional-options))
534539

535540
;;;###autoload
536-
(defun org-projectile:capture-for-current-project (&optional capture-template)
541+
(defun org-projectile:capture-for-current-project
542+
(&optional capture-template &rest additional-options)
537543
"Capture a TODO for the current active projectile project.
538544
539545
If CAPTURE-TEMPLATE is provided use it as the capture template for the TODO."
540546
(interactive)
541547
(let ((project-name (projectile-project-name)))
542548
(if (projectile-project-p)
543-
(org-projectile:capture-for-project project-name capture-template)
549+
(apply #'org-projectile:capture-for-project
550+
project-name capture-template additional-options)
544551
(error (format "%s is not a recognized projectile project." project-name)))))
545552

546553
(provide 'org-projectile)

0 commit comments

Comments
 (0)