diff options
| author | Ken Raeburn | 2001-10-07 11:03:59 +0000 |
|---|---|---|
| committer | Ken Raeburn | 2001-10-07 11:03:59 +0000 |
| commit | b056f36d1035023b97b5d6a654a99ccc843be846 (patch) | |
| tree | a91da0c478d7b1b5d9813958ad3e47b20f179540 /src | |
| parent | 0037e2f2cbd66f096ebb53a3eb141598ac42337d (diff) | |
| download | emacs-b056f36d1035023b97b5d6a654a99ccc843be846.tar.gz emacs-b056f36d1035023b97b5d6a654a99ccc843be846.zip | |
* minibuf.c (Fminibuffer_prompt_end): Don't apply make_number to a Lisp_Object.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 3 | ||||
| -rw-r--r-- | src/minibuf.c | 2 |
2 files changed, 4 insertions, 1 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index c9f15add329..d540f05822e 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,5 +1,8 @@ | |||
| 1 | 2001-10-07 Ken Raeburn <raeburn@gnu.org> | 1 | 2001-10-07 Ken Raeburn <raeburn@gnu.org> |
| 2 | 2 | ||
| 3 | * minibuf.c (Fminibuffer_prompt_end): Don't apply make_number to a | ||
| 4 | Lisp_Object. | ||
| 5 | |||
| 3 | * lisp.h (Ffield_end): Declare. | 6 | * lisp.h (Ffield_end): Declare. |
| 4 | 7 | ||
| 5 | 2001-10-07 Gerd Moellmann <gerd@gnu.org> | 8 | 2001-10-07 Gerd Moellmann <gerd@gnu.org> |
diff --git a/src/minibuf.c b/src/minibuf.c index 8ffb6c70d85..cf98cc98b3b 100644 --- a/src/minibuf.c +++ b/src/minibuf.c | |||
| @@ -335,7 +335,7 @@ Return (point-min) if current buffer is not a mini-buffer.") | |||
| 335 | Lisp_Object end = Ffield_end (beg, Qnil); | 335 | Lisp_Object end = Ffield_end (beg, Qnil); |
| 336 | 336 | ||
| 337 | if (XINT (end) == ZV && NILP (Fget_char_property (beg, Qfield, Qnil))) | 337 | if (XINT (end) == ZV && NILP (Fget_char_property (beg, Qfield, Qnil))) |
| 338 | return make_number (beg); | 338 | return beg; |
| 339 | else | 339 | else |
| 340 | return end; | 340 | return end; |
| 341 | } | 341 | } |