2116 |
() |
() |
2117 |
{ |
{ |
2118 |
register int i; |
register int i; |
2119 |
Lisp_Object val; |
Lisp_Object val, tem; |
2120 |
|
|
2121 |
/* Allow user to specify null string */ |
/* Allow user to specify null string */ |
2122 |
if (XINT (Fminibuffer_prompt_end ()) == ZV) |
if (XINT (Fminibuffer_prompt_end ()) == ZV) |
2123 |
goto exit; |
goto exit; |
2124 |
|
|
2125 |
val = Fminibuffer_contents (); |
val = Fminibuffer_contents (); |
2126 |
if (!NILP (Ftest_completion (val, |
tem = Ftest_completion (val, |
2127 |
Vminibuffer_completion_table, |
Vminibuffer_completion_table, |
2128 |
Vminibuffer_completion_predicate))) |
Vminibuffer_completion_predicate); |
2129 |
|
if (!NILP (tem)) |
2130 |
{ |
{ |
2131 |
if (completion_ignore_case) |
if (completion_ignore_case) |
2132 |
{ /* Fixup case of the field, if necessary. */ |
{ /* Fixup case of the field, if necessary. */ |