Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

36 lines (30 sloc) 0.987 kB
;;; ecukes-helpers.el --- Misc helpers
(require 'dash)
(require 'ecukes-def)
(defun ecukes-feature-steps (ecukes-features)
"Return all steps in all FEATURES."
(let* ((scenarios
(-flatten
(-map
(lambda (feature)
(ecukes-feature-scenarios feature)) ecukes-features)))
(backgrounds
(-reject
'null
(-map
(lambda (feature)
(ecukes-feature-background feature)) ecukes-features)))
(scenario-steps
(-map
(lambda (scenario)
(ecukes-scenario-steps scenario)) scenarios))
(background-steps
(-map
(lambda (background)
(ecukes-background-steps background)) backgrounds)))
(-flatten (-concat background-steps scenario-steps))))
(defun ecukes-format-quote (string)
"Quote percent signs in STRING."
(s-replace "%" "%%" string))
(provide 'ecukes-helpers)
;;; ecukes-helpers.el ends here
Jump to Line
Something went wrong with that request. Please try again.