-
Notifications
You must be signed in to change notification settings - Fork 0
New issue
Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.
By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.
Already on GitHub? Sign in to your account
More regression tests #272
Conversation
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
Tests run correctly at my machine. Some smaller changes requested
@@ -45,12 +45,14 @@ | |||
(def aangeboden-opleiding-namen | |||
#{:aangebodenHOOpleidingsonderdeel :aangebodenHOOpleiding :aangebodenParticuliereOpleiding}) | |||
|
|||
;; NOTE: aangeboden opleidingen are reference by OOAPI UID |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
"referenced"
:retryable? false}))) | ||
|
||
(let [soap-action (str "opvragen_" type) | ||
rio-sexp (condp = type | ||
;; Command line only. | ||
opleidingseenheden-van-organisatie | ||
[[:duo:onderwijsbestuurcode id] | ||
[[:duo:onderwijsbestuurcode opleidingscode] ;; FIXME: this is not an opleidingscode! |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
Waarom is deze verandering er dan?
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
Omdat het stuk is zonder deze aanpassing. De FIXME
heb ik toegevoegd omdat het hier natuurlijk om een bestuurcode gaat en er dus heel slordig gewoon een property misbruikt wordt.
|
||
(def ^:private last-boxed-print (atom nil)) | ||
|
||
(defmacro print-boxed | ||
"Print pretty box around output of evaluating `form`." | ||
[title & form] | ||
`(let [s# (with-out-str (do ~@form))] | ||
`(let [r# (transient []) |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
Useless binding is overwritten at line 40
(concat result (f file)) | ||
(conj result file))) | ||
result)))] | ||
(f (entities-dir)))) |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
Als je f als named functie extract, kan je die loop
ook omzetten in mapcat
;; scenario [8b]: Test /job/link to reset the course to the old 'eigen sleutel'. | ||
:TODO) | ||
(testing "scenario [7a]: Test /job/upsert with the edspec for a course. You can expect 'done'." | ||
(let [job (post-job :upsert :education-specifications "parent-course")] |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
Ik vind "parent-course" wel een verwarrende naam voor een education specification. Vooral als de course dan weer gewoon "some" heet...
59561dd
to
9a5fb1d
Compare
9a5fb1d
to
e7856eb
Compare
e7856eb
to
b4ed154
Compare
No description provided.