58
59
60
61
62
63
64
65
66
67
68
|
(add-runname-mapper 'auto
(lambda (target run-name area area-path reason contour mode-patt)
"auto-eh"))
;; run only areas where first letter of area name is "a"
;;
(add-area-checker 'first-letter-a
(lambda (area runkey)
(string-match "^a.*$" area)))
|
|
|
|
58
59
60
61
62
63
64
65
66
67
68
|
(add-runname-mapper 'auto
(lambda (target run-name area area-path reason contour mode-patt)
"auto-eh"))
;; run only areas where first letter of area name is "a"
;;
(add-area-checker 'first-letter-a
(lambda (area target contour)
(string-match "^a.*$" area)))
|