@@ -1565,11 +1565,11 @@
 																;(nn-send rep "ok")
                                 (if (not (equal? instr "ping"))
                                   (begin
                                    (debug:print 0 *default-log-port* ctime " running \"" script " " instr "\"")
                                     ;(system (conc script " '" instr "'"))
-                                      (process-run script (list (conc "'" instr "'")))  
+                                      (process-run script (list  instr ))  
                                      (debug:print 0 *default-log-port* ctime " done" ))))))
                            (loop (nn-recv rep))))
 		       (print "ERROR: Port " portnum " already in use. Try another port")))))))
       ((gather) ;; gather all area db's into /tmp/$USER_megatest/alldbs
        (let* ((mtconfdat (simple-setup (args:get-arg "-start-dir")))