anchor.diff:      (lambda (mode)
         (make-page-editable)
         (block-page-keypresses)
  -      (select-paragraph)))))
  +      (select-paragraph)
  +      ;; imitating visual mode in vim
  +      (if (equal (keymap-scheme-name (buffer mode)) scheme:vi-normal)
  +        (setf *mark-set* t))))))
   
   (define-parenscript %add-paragraph-hints (&key annotate-visible-only-p)
     (defun qs (context selector)
  
positive.code:        "C-e" 'end-line
         "M-a" 'backward-sentence
         "M-e" 'forward-sentence)
        ;; have no idea what to do with vi-style bindings (yet)
        ;; they seem very different from Emacs ones, and there even
        ;; seem to be multiple visual modes (char-wise, line-wise, block-wise)
        #||scheme:vi
        (list
         "")||#))
     (destructor
      (lambda (mode)
        (make-page-uneditable)
  
negative.code:                        (rem n 26)))) ""))
  
    (add-stylesheet)
    (hints-add (qsa-text-nodes)))
  
  (defclass paragraph-hint (nyxt/web-mode::hint) ())
  
  