Weblocks reset sessions on eval

I'm using vim+slimv+swank+sbcl and here is a trick so weblocks resets sessions on each code eval. Simply put snippet into file and load file from somewhere in the code.

Code (https://gist.github.com/1163186):

(in-package :swank)

(defun my-repl-eval (string) 
  (format t "; Reseting weblocks sessions~%")
  (weblocks:reset-sessions)
  (repl-eval string))

(setq *listener-eval-function* #'my-repl-eval)