平衡点

2014/09/09

_ org-redmine で複数 Project の切り替え

読んで字の如し:

Redmine が複数ある場合に使い分けるために, fukamachi/redmine-el を見ながら変な関数をでっち上げてみたり.

# source: scheme
  (defun my:org-redmine-select-project()
    (interactive)
    (anything
     `(((name . "Select Project")
        (candidates . ,(mapcar 'car my:org-redmine-project-alist))
        (volatile)
        (action . (lambda (project-name)
                    (progn
                      (setq org-redmine-uri (cadr (assoc project-name my:org-redmine-project-alist)))
                      (setq org-redmine-auth-api-key (caddr (assoc project-name my:org-redmine-project-alist)))
                      (message (format "Redmine Project was changed to \"%s\"." project-name)))))))))

とりあえず動くから良しとする.

あとは org への登録のフォーマット. 日付をで書いているので他の TODO 項目と揃えたいのだけれど, 本体に手を入れるのもなんだかなぁ...

[ツッコミを入れる]