Re: address@hidden: cursor-in-echo-area ignores the default cursor type]

[Chong Yidong]

> After setting the default cursor type to something other than the default
> block cursor:
>
>   (setq default-cursor-type 'bar)
>
> and using a function that internally sets the variable `cursor-in-echo-area'
> to non-nil, e.g.:
>
>   (y-or-n-p "prompt: ")
>
> the specified cursor type is ignored and the minibuffer in all these cases
> displays the block cursor.

How about this fix?

*** emacs/src/xdisp.c.~1.1069.~ 2005-12-12 14:31:22.000000000 -0500
--- emacs/src/xdisp.c   2006-01-13 17:14:42.000000000 -0500
***************
*** 20772,20779 ****
      {
        if (w == XWINDOW (echo_area_window))
        {
!         *width = FRAME_CURSOR_WIDTH (f);
!         return FRAME_DESIRED_CURSOR (f);
        }
  
        *active_cursor = 0;
--- 20772,20784 ----
      {
        if (w == XWINDOW (echo_area_window))
        {
!         if (EQ (b->cursor_type, Qt) || NILP (b->cursor_type))
!           {
!             *width = FRAME_CURSOR_WIDTH (f);
!             return FRAME_DESIRED_CURSOR (f);
!           }
!         else
!           return get_specified_cursor_type (b->cursor_type, width);
        }
  
        *active_cursor = 0;