Skip to content

Commit

Permalink
Release 0.5
Browse files Browse the repository at this point in the history
  • Loading branch information
kentaro committed Nov 5, 2008
1 parent e99a6bd commit 64a07ea
Show file tree
Hide file tree
Showing 34 changed files with 2,453 additions and 1,230 deletions.
4 changes: 4 additions & 0 deletions .ditz-config
@@ -0,0 +1,4 @@
--- !ditz.rubyforge.org,2008-03-06/config
name: antipop
email: kentarok@gmail.com
issue_dir: issues
6 changes: 4 additions & 2 deletions README
Expand Up @@ -41,14 +41,16 @@ system. You can get Ditz from http://ditz.rubyforge.org/.

(7) Run M-x ditz-add to add a new issue

(8) M-x ditz-status, ditz-todo, ditz-todo, ditz-log are useful for
browsing your issues.
(8) M-x ditz-status, ditz-todo, ditz-log are useful for browsing your
issues.

(9) To change issues/releases' status:

[1] Run M-x ditz-todo to list issues up.
[2] Enter the keys below on underlined strings:

- "A": ditz-add (Add issue)
- "D": ditz-drop (Drop issue)
- "s": ditz-show (Show issue's detail)
- "e": ditz-edit (Edit issue's detail)
- "a": ditz-assign (Assign/reassign issue to a release)
Expand Down
7 changes: 3 additions & 4 deletions ditz.el
Expand Up @@ -50,7 +50,7 @@ must set it from minibuffer."
(defconst ditz-issue-id-regex "^[_ ]+\\([^:\n]+\\):.*$"
"Regex for issue id.")

(defconst ditz-release-name-regex "^Version *\\([^\n ]+\\) *.*$"
(defconst ditz-release-name-regex "^\\(Version \\)?\\([^\n ]+\\) *.*$"
"Regex for issue id.")

;; Commands
Expand Down Expand Up @@ -107,7 +107,6 @@ must set it from minibuffer."
(ditz-call-process "assign" issue-id "switch")
(error "Issue id not found"))))

;; Doesn't work now
(defun ditz-edit ()
"Edit issue detale."
(interactive)
Expand Down Expand Up @@ -140,7 +139,7 @@ must set it from minibuffer."
"Mark issues as released."
(interactive)
(let ((release-name nil))
(setq release-name (ditz-extract-thing-at-point ditz-release-name-regex 1))
(setq release-name (ditz-extract-thing-at-point ditz-release-name-regex 2))
(if release-name
(ditz-call-process "release" release-name "switch")
(error "Release name not found"))))
Expand Down Expand Up @@ -240,7 +239,7 @@ must set it from minibuffer."

(setq ditz-last-visited-issue-directory issue-directory)
(mapconcat 'identity
(list ditz-program command arg "-i" issue-directory) " ")))
(list ditz-program "-i" issue-directory command arg) " ")))

;; Hooks
(defvar ditz-mode-hook nil
Expand Down
Binary file added html/blue-check.png
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.

0 comments on commit 64a07ea

Please sign in to comment.