anchor.diff:  (define-key *minibuf-keymap* (kbd "C-m") 'minibuf-read-line-confirm)
   (define-key *minibuf-keymap* (kbd "C-i") 'minibuf-read-line-completion)
   (define-key *minibuf-keymap* (kbd "C-u") 'minibuf-read-line-clear-before)
  -(define-key *minibuf-keymap* (kbd "C-p") 'minibuf-read-line-prev-log)
  -(define-key *minibuf-keymap* (kbd "C-n") 'minibuf-read-line-next-log)
  +(define-key *minibuf-keymap* (kbd "C-p") 'minibuf-read-line-prev-history)
  +(define-key *minibuf-keymap* (kbd "C-n") 'minibuf-read-line-next-history)
   (define-key *minibuf-keymap* (kbd "C-g") 'minibuf-read-line-break)
   
   (defvar *minibuf-read-line-tmp-window*)
  
positive.code:           minibuf-read-line-confirm
            minibuf-read-line-completion
            minibuf-read-line-clear-before
            minibuf-read-line-prev-log
            minibuf-read-line-next-log
            minibuf-get-line
            minibuf-read-line-refresh
            minibuf-read-line
  
negative.code:          (*last-flags* (make-flags) *curr-flags*))
          ((not *minibuf-read-line-loop*)
           (let ((str (minibuf-get-line)))
             (add-history *minibuf-read-line-history* str)
             str))
        (minibuf-read-line-refresh prompt)
        (let* ((key (input-key))
  