src/middleware/load-file.lisp @ 6eb527beb6b9

(in-package #:nrepl)

(define-middleware wrap-load-file "load-file" message
  (let ((path (fset:lookup message "path")))
    (evaluate-forms message (list `(load ,path)))))