2012-12-08 17 views
2

这是我所想达到安装和拆卸临时目录的midje事实

(let [temp-dir (create-temp-dir)]   ; setup 
    (fact 
    (do-something-with temp-dir) => true) ; actual test 
    (delete-dir temp-dir))     ; teardown 

骨架的midje测试框架给出access to lexical scope(向下滚动接近年底)。所以这是我所期待的工作:

(against-background 
    (around :facts 
    (let [temp-dir (create-temp-dir)] 
     (do ?form (delete-dir temp-dir)))) 
    (fact (do-something-with temp-dir) => true)) 

但是,编译器抱怨说,它无法解析符号temp-dir。任何想法如何使这项工作?

回答

1

你错过了你的包装的方括号。从你的链接包括:

零个或多个包装有三种不同的形式出现:

(对背景[包装] ...)

该包装适用于所有形式在反对背景之内。

(其实...(针对背景包装)...)

在语义上,这是相同的作为一个包装 此单事实上对背景。反背景表单可以出现在事实的顶层表单中的任何地方,并且可以有多个表单。请注意,它不是[]包围的 。

(背景包装...)