Index: genexample.scm ================================================================== --- genexample.scm +++ genexample.scm @@ -470,13 +470,13 @@ (print "[ezsteps]") (for-each (lambda (teststep) (let* ((step-name (vector-ref teststep 0))) (print (obfuscate step-name) - " sleep [refdb lookup #{getenv MT_RUN_AREA_HOME}/stepsinfo " + " sleep $(refdb lookup #{getenv MT_RUN_AREA_HOME}/stepsinfo " (obfuscate testname) " $MT_ITEMPATH " - (obfuscate step-name) "]"))) + (obfuscate step-name) ")"))) test-steps) ;; now the requirements section (if testconfig (begin @@ -490,11 +490,11 @@ (else (print key " " val))))) (configf:get-section testconfig "requirements"))) #;(print "WARNING: No testconfig data for " testname ", " item-path)) (print "\n[items]") - (print "THE_ITEM [refdb getrow #{getenv MT_RUN_AREA_HOME}/miscinfo itemsinfo " (obfuscate testname)" | awk '{print $1}']") + (print "THE_ITEM [system refdb getrow #{getenv MT_RUN_AREA_HOME}/miscinfo itemsinfo " (obfuscate testname)" | awk '{print $1}']") ))) ;; fill the stepsrdb (for-each (lambda (teststep)