Mercurial > emacs

comparison src/lread.c @ 16039:855c8d8ba0f0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Change all references from point to PT.
author Karl Heuer <kwzh@gnu.org>
date Sun, 01 Sep 1996 19:15:05 +0000
parents 3b5ffd35defe
children 9cbc74969e46
comparison
equal deleted inserted replaced
16038:8cd162ceb1dc 16039:855c8d8ba0f0
217 since readchar didn't advance it when we read it. */ 217 since readchar didn't advance it when we read it. */
218 ; 218 ;
219 else if (BUFFERP (readcharfun)) 219 else if (BUFFERP (readcharfun))
220 { 220 {
221 if (XBUFFER (readcharfun) == current_buffer) 221 if (XBUFFER (readcharfun) == current_buffer)
222 SET_PT (point - 1); 222 SET_PT (PT - 1);
223 else 223 else
224 SET_BUF_PT (XBUFFER (readcharfun), BUF_PT (XBUFFER (readcharfun)) - 1); 224 SET_BUF_PT (XBUFFER (readcharfun), BUF_PT (XBUFFER (readcharfun)) - 1);
225 } 225 }
226 else if (MARKERP (readcharfun)) 226 else if (MARKERP (readcharfun))
227 XMARKER (readcharfun)->bufpos--; 227 XMARKER (readcharfun)->bufpos--;