mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-25 07:02:53 +00:00
Add a command to open the project with TaskJugglerUI
This commit is contained in:
parent
0b0ada4beb
commit
01d0aab493
|
@ -175,7 +175,19 @@
|
|||
(org-taskjuggler-open-task task)
|
||||
(setq old-level level)))
|
||||
(org-taskjuggler-close-maybe 1)
|
||||
(org-taskjuggler-insert-reports))))
|
||||
(org-taskjuggler-insert-reports)
|
||||
(save-buffer)
|
||||
(or (org-export-push-to-kill-ring "TaskJuggler")
|
||||
(message "Exporting... done"))
|
||||
(current-buffer))))
|
||||
|
||||
;;;###autoload
|
||||
(defun org-export-as-taskjuggler-and-open ()
|
||||
"Export the current buffer as a TaskJuggler file and open it with the TaskJuggler GUI."
|
||||
(interactive)
|
||||
(let ((file-name (buffer-file-name (org-export-as-taskjuggler)))
|
||||
(command "TaskJugglerUI"))
|
||||
(start-process-shell-command command nil command file-name)))
|
||||
|
||||
(defun org-taskjuggler-components ()
|
||||
(let* ((props (org-entry-properties))
|
||||
|
|
Loading…
Reference in a new issue