-
Notifications
You must be signed in to change notification settings - Fork 5
/
elmine-tests.el
73 lines (39 loc) · 1.73 KB
/
elmine-tests.el
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
;; I´m currently not very confident writing tests. Especially when in
;; the need for mocking URL requests.
;; Currently this file only contains expressions that I ran against my
;; personal redmine to verify the functionality.
;; TODO: Write real tests.
(elmine/api-raw "GET" "/issues/93.json" nil nil)
(elmine/api-raw "POST" "/projects/personal/issues.json"
"{\"issue\": {\"abc\":\"test\"}}" nil)
(elmine/api-raw "DELETE" "/issues/102.json" nil nil)
(elmine/api-post :issue '(:subject "It´s not blank")
"/projects/personal/issues.json")
(elmine/api-get :issue "/issues/93.json")
(elmine/get-issues)
(elmine/get-issue 105)
(elmine/create-issue '(:subject "Some Title" :project_id "personal"))
(elmine/create-issue :subject "Some Other Title" :project_id "personal")
(elmine/update-issue '(:id 105 :subject "Changed Title 2"))
(elmine/delete-issue 101)
(elmine/get-issue-time-entries 4)
(elmine/get-issue-relations 99)
(elmine/get-projects)
(elmine/get-project "personal")
(elmine/create-project :name "Ein Test-Project" :identifier "test-project")
(elmine/update-project '(:identifier "test-project" :name "Ein neuer Test-Projekt-Name"))
(elmine/delete-project "test-project")
(elmine/get-project-categories "personal")
(elmine/get-project-issues "personal")
(elmine/get-project-versions "personal")
(elmine/get-version 16)
(elmine/create-version :project_id "personal" :name "ABCDEFG")
(elmine/update-version :id 18 :name "XYZ")
(elmine/get-issue-statuses)
(elmine/get-trackers)
(elmine/get-issue-priorities)
(elmine/get-time-entries)
(elmine/get-time-entry 1)
(elmine/create-time-entry :issue_id 93 :activity_id 1 :hours "2.0")
(elmine/update-time-entry :id 5 :hours "3.0")
(elmine/delete-time-entry 5)