bug#45177: 27.1; Access to invoking top level command in minibuffer

[Clemens]

> (defun icicle-top-level-prep ()
>    "Do top-level stuff.  Used in `pre-command-hook'."
>    (unless (> (minibuffer-depth) 0)
>      ;; ... <other stuff>
>      (unless (memq this-command
>                    '(minibuffer-complete-and-exit
>                      icicle-minibuffer-complete-and-exit
>                      exit-minibuffer
>                      icicle-exit-minibuffer))
>        (setq icicle-last-top-level-command  this-command))
>      ;; ... <other stuff>
>      ))
>
> (defvar icicle-last-top-level-command nil
>    "Last top-level command used.")


Thanks Drew! Looks like a nice workaround!