         (org-redmine-insert-property issue))))
 
 ;;------------------------------
+;; org-redmine read buffer functions
+;;------------------------------
+(defun org-redmine-cur-org-issue ()
+ (make-org-redmine-issue-struct :subject (nth 4 (org-heading-components)) :project_id (nth 1 (org-get-tags))))
+
+(defun org-redmine-jsonize-issue (issue)
+  (concat "{ \"issue\": {"
+         "\"project_id\": \"" (org-redmine-issue-struct-project_id issue) "\"" ","
+         "\"subject\": \"" (org-redmine-issue-struct-subject issue) "\"" ","
+         "\"assigned_to_id\":" org-redmine-assignee-id
+       "}}")
+)
+;;------------------------------
 ;; org-redmine sources for user function
 ;;------------------------------
 (defun org-redmine-get-issue-all (me)

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

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

  '(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
;;------------------------------
