cleanup old ecukes steps

This commit is contained in:
Donald Curtis 2013-03-11 07:14:19 -05:00
parent 18067bd7d8
commit 16deaaae3e

View file

@ -1,7 +1,3 @@
(Given "^initialization$"
(lambda ()
(package-build-initialize)))
(Given "^read recipes$" (Given "^read recipes$"
(lambda () (lambda ()
(pb/read-recipes))) (pb/read-recipes)))
@ -37,10 +33,6 @@
nil "package-build-archive-alist = %s is not equal to %s." nil "package-build-archive-alist = %s is not equal to %s."
(package-build-archive-alist) varval)))) (package-build-archive-alist) varval))))
(Given "archive alist set to \\(.+\\)$"
(lambda (var)
(package-build-archive-alist (car (read-from-string var)))))
(Then "archive alist should be \\(.+\\)$" (Then "archive alist should be \\(.+\\)$"
(lambda (var) (lambda (var)
(let ((varval (car (read-from-string var)))) (let ((varval (car (read-from-string var))))