hg.stevelosh.com > cl-nrepl

(in-package :nrepl)

(define-middleware wrap-load-file "load-file" message
  (let ((path (fset:lookup message "path")))
    (evaluate-forms message (list `(load ,path)))))
author	Steve Losh <steve@stevelosh.com>
date	Tue, 14 Mar 2017 13:33:00 +0000
parents	919ebd924aac
children	(none)