anchor.diff:  
   (declaim (ftype (function (trivial-types:pathname-designator &key (:interactive t) (:package (or null package))))
                   load-lisp))
  -(defun load-lisp (file &key interactive package)
  +(defun load-lisp (file &key interactive package) ; TODO: Replace `interactive' with `*keep-alive*'.
     "Load the Lisp FILE (or stream).
      If FILE is \"-\", read from the standard input.
      If INTERACTIVE is t, allow the debugger on errors. If :running, show
  
positive.code: 
      (when (or (getf options :load)
                (getf options :eval))
        (unless (getf options :no-init)
          (load-lisp (init-file-path) :interactive nil :package (find-package :next-user)))
        ;; We need a browser instance so that listen-socket-p can know the socket path.
        ;; TODO: Use (get-default ...) instead?  Ideally, socket could also
  
negative.code:     (setf *keep-alive* nil)             ; Not a REPL.
      (start :urls free-args)))
  
  (defun init-file-path (&key (default-basename "init.lisp"))
    "Return the path of the initialization file."
    ;; This can't be a regular variable or else the value will be hard-coded at
    ;; compile time, even with (eval-when (:execute) ...
    (match (getf *options* :init)
      (nil (xdg-config-home default-basename))
      ("" nil)
      (file file)))
  
  (defparameter *load-init-error-message* "Error: Could not load the init file")
  (defparameter *load-init-type-error-message* (str:concat *load-init-error-message*
  