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;