comparison src/minibuf.c @ 80:1ce6082ce73f r20-0b90

Import from CVS: tag r20-0b90
author cvs
date Mon, 13 Aug 2007 09:06:37 +0200
parents 131b0175ea99
children fe104dbd9147
comparison
equal deleted inserted replaced
79:5b0a5bbffab6 80:1ce6082ce73f
346 } 346 }
347 else 347 else
348 { 348 {
349 if (!ZEROP (bucket)) 349 if (!ZEROP (bucket))
350 { 350 {
351 struct Lisp_Symbol *next = symbol_next (XSYMBOL (bucket)); 351 struct Lisp_Symbol *next;
352 if (!SYMBOLP (bucket)) {
353 signal_simple_error("Bad obarry passed to try-completions",
354 bucket);
355 }
356 next = symbol_next (XSYMBOL (bucket));
352 elt = bucket; 357 elt = bucket;
353 eltstring = Fsymbol_name (elt); 358 eltstring = Fsymbol_name (elt);
354 if (next) 359 if (next)
355 XSETSYMBOL (bucket, next); 360 XSETSYMBOL (bucket, next);
356 else 361 else