Index: mtut.scm ================================================================== --- mtut.scm +++ mtut.scm @@ -1008,11 +1008,11 @@ (for-each (lambda (area) ;Add code to check whether area is valid (if ;; This code checks whether the target has been passed in via argument, and only runs the specified target - (and (< packets-generated (or (configf:lookup mtconf "setup" "max_packets_per_run") 10000)) (if (args:get-arg "-target") + (and (< packets-generated (or (string->number (configf:lookup mtconf "setup" "max_packets_per_run")) 10000)) (if (args:get-arg "-target") (if (string= (args:get-arg "-target") runkey) (area-allowed? area "area-needs-to-be-run" runkey contour #f) #f) (area-allowed? area "area-needs-to-be-run" runkey contour #f))) (let* ((script (car cmd)) (params (cdr cmd))