   '(nil
     nil
     "%d"))
-
+(defvar org-redmine-assignee-id nil)
+
+(defstruct org-redmine-issue-struct
+  "A structure to keep issue properties"
+  subject
+  project_id
+  )
 ;;------------------------------
 ;; org-redmine error signals
 ;;------------------------------

         (message "%s: Non JSON data because of a server side exception. See %s"
                  (error-message-string err) org-redmine-curl-buffer))))))

(defun org-redmine-curl-args (uri)
  (let ((args '("-X" "GET" "-s" "-f")))
    (append

           (t ""))
     `(,uri))))

(defun org-redmine-curl-post-args (uri data)
  (let ((args '("-X" "POST" "-s" "-f" "-H" "Content-Type: application/json" "-d")))
    (append
     args
     (list data)
     (cond (org-redmine-auth-api-key
            `("-G" "-d"
              ,(format "key=%s" org-redmine-auth-api-key)))
           (org-redmine-auth-username
            `("-u"
              ,(format "%s:%s"
                       org-redmine-auth-username (or org-redmine-auth-password ""))))
           (org-redmine-auth-netrc-use '("--netrc"))
           (t ""))
     `(,uri))))

;;------------------------------
;; org-redmine template functions
;;------------------------------
