comparison src/minibuf.c @ 6701:4fe5b1447c3f

(Fminibuffer_prompt_width): Allow for negative value.

6700:db2292ce4894

  return build_string (minibuf_prompt);
}

DEFUN ("minibuffer-prompt-width", Fminibuffer_prompt_width,
  Sminibuffer_prompt_width, 0, 0, 0,
  "Return the display width of the minibuffer prompt.")
  ()
{
  Lisp_Object width;
  XFASTINT (width) = minibuf_prompt_width;
  return width;
}

init_minibuf_once ()
{

6701:4fe5b1447c3f

  return build_string (minibuf_prompt);
}

DEFUN ("minibuffer-prompt-width", Fminibuffer_prompt_width,
  Sminibuffer_prompt_width, 0, 0, 0,
  "Return the horizontal position after the minibuffer prompt.\n\
This may be less than the actual display width of the minibuffer prompt,\n\
or even negative, if horizontal scrolling is in effect in the minibuffer.")
  ()
{
  Lisp_Object width;
  XSET (width, Lisp_Int, minibuf_prompt_width);
  return width;
}

init_minibuf_once ()
{