@@ -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
528532If 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
539545If 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