Mercurial > emacs
comparison src/minibuf.c @ 648:70b112526394
*** empty log message ***
author | Jim Blandy <jimb@redhat.com> |
---|---|
date | Mon, 18 May 1992 08:14:41 +0000 |
parents | 4fddd0f0fc33 |
children | 71f59bd24996 |
comparison
equal
deleted
inserted
replaced
647:529171c8b71c | 648:70b112526394 |
---|---|
1 /* Minibuffer input and completion. | 1 /* Minibuffer input and completion. |
2 Copyright (C) 1985, 1986 Free Software Foundation, Inc. | 2 Copyright (C) 1985, 1986, 1992 Free Software Foundation, Inc. |
3 | 3 |
4 This file is part of GNU Emacs. | 4 This file is part of GNU Emacs. |
5 | 5 |
6 GNU Emacs is free software; you can redistribute it and/or modify | 6 GNU Emacs is free software; you can redistribute it and/or modify |
7 it under the terms of the GNU General Public License as published by | 7 it under the terms of the GNU General Public License as published by |
8 the Free Software Foundation; either version 1, or (at your option) | 8 the Free Software Foundation; either version 2, or (at your option) |
9 any later version. | 9 any later version. |
10 | 10 |
11 GNU Emacs is distributed in the hope that it will be useful, | 11 GNU Emacs is distributed in the hope that it will be useful, |
12 but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 but WITHOUT ANY WARRANTY; without even the implied warranty of |
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | 13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
193 SCREEN_CURSOR_X (selected_screen) = 0; | 193 SCREEN_CURSOR_X (selected_screen) = 0; |
194 update_screen (selected_screen, 1, 1); | 194 update_screen (selected_screen, 1, 1); |
195 } | 195 } |
196 | 196 |
197 /* Make minibuffer contents into a string */ | 197 /* Make minibuffer contents into a string */ |
198 val = make_string (BEG_ADDR, Z - BEG); | 198 val = make_buffer_string (1, Z); |
199 bcopy (GAP_END_ADDR, XSTRING (val)->data + GPT - BEG, Z - GPT); | 199 bcopy (GAP_END_ADDR, XSTRING (val)->data + GPT - BEG, Z - GPT); |
200 unbind_to (count, Qnil); /* The appropriate screen will get selected | 200 unbind_to (count, Qnil); /* The appropriate screen will get selected |
201 in set-window-configuration. */ | 201 in set-window-configuration. */ |
202 | 202 |
203 UNGCPRO; | 203 UNGCPRO; |