anchor.diff:  (defpackage :lem-python-mode.run-python
     (:use :cl :lem :lem-python-mode)
  -  (:export :run-python))
  +  (:export :*python-run-command*
  +           :run-python))
   (in-package :lem-python-mode.run-python)
  +
  +(defvar *python-run-command* #-win32 "python"
  +                             #+win32 '("python" "-i"))
   
   (defvar *process* nil)
   
  
positive.code: 
  (defun run-python-internal ()
    (unless (alive-process-p)
      (setf *process*
            (lem-process:run-process "python"
                                     :name "run-python"
                                     :output-callback 'output-callback))))
  
  (define-command python-eval-region (start end) ("r")
    (when (alive-process-p)
      (lem-process:process-send-input *process* (points-to-string start end))))
  
  (define-command run-python () ()
    (run-python-internal))
  
negative.code: 
  (defun get-repl-buffer ()
    (let ((buffer (make-buffer "*python*")))
      (unless (eq (buffer-major-mode buffer) 'run-python-mode)
        (change-buffer-mode buffer 'run-python-mode))
      buffer))
  
  (defun output-callback (string)
  