anchor.diff:  
   (defun prompt-for-line (prompt initial comp-f existing-p history-name
                           &optional (syntax-table (current-syntax)))
  +  (when (= 0 *minibuf-read-line-depth*)
  +    (run-hooks *minibuffer-activate-hook*))
     (when (and (not *enable-recursive-minibuffers*) (< 0 *minibuf-read-line-depth*))
       (editor-error "ERROR: recursive use of minibuffer"))
     (let ((*minibuffer-calls-window* (current-window))
  
positive.code:                                 (put-text-property start end :field t)))
                              (move-point (current-point) minibuf-buffer-prev-point)
                              (when (= 1 *minibuf-read-line-depth*)
                                (%switch-to-buffer *echoarea-buffer* nil nil)
                                ))))))
                  (editor-abort (c)
  
negative.code: (export '(*enable-recursive-minibuffers*
            *minibuffer-completion-function*
            *minibuffer-file-complete-function*
            *minibuffer-activate-hook*
            *minibuffer-deactivate-hook*
            *minibuf-keymap*
            minibuffer-prompt-attribute
            minibuffer-window-p
  