mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-25 08:02:52 +00:00
Fix the id generation of a project
This commit is contained in:
parent
e0e433f1d7
commit
d0556719b9
|
@ -266,15 +266,14 @@
|
|||
(and id (replace-regexp-in-string "[^a-zA-Z0-9_]" "_" id)))
|
||||
|
||||
(defun org-taskjuggler-open-project (project)
|
||||
(let ((id (org-taskjuggler-clean-id (cdr (assoc "ID" project))))
|
||||
(let ((unique-id (cdr (assoc "unique-id" project)))
|
||||
(headline (cdr (assoc "headline" project)))
|
||||
(version (cdr (assoc "version" project)))
|
||||
(start (cdr (assoc "start" project)))
|
||||
(end (cdr (assoc "end" project))))
|
||||
(insert
|
||||
(concat
|
||||
"project "
|
||||
(or id "FIXME")
|
||||
"project " unique-id
|
||||
" \"" headline "\" \"" version "\" " start " - " end " {\n " "}\n"))))
|
||||
|
||||
(defun org-taskjuggler-open-resource (resource)
|
||||
|
|
Loading…
Reference in a new issue