- (apply #'concat
- (riece-async-substitute-variables
- (riece-async-substitute-variables
- (riece-async-substitute-variables
- riece-async-server-program
- 'host
- (concat "'" host "'"))
- 'service
- (if (numberp service)
- (number-to-string service)
- (concat "'" service "'")))
- 'max-buffer-size
- (number-to-string
- riece-async-max-buffer-size))))
+ (riece-ruby-substitute-variables
+ (list (cons 'host
+ (concat "'" host "'"))
+ (cons 'service
+ (if (numberp service)
+ (number-to-string service)
+ (concat "'" service "'")))
+ (cons 'max-buffer-size
+ (number-to-string
+ riece-async-max-buffer-size)))))