Mercurial > hg > xemacs-beta
comparison lisp/prim/lisp.el @ 116:9f59509498e1 r20-1b10
Import from CVS: tag r20-1b10
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:23:06 +0200 |
parents | 0d2f883870bc |
children | 1370575f1259 |
comparison
equal
deleted
inserted
replaced
115:f109f7dabbe2 | 116:9f59509498e1 |
---|---|
324 (car list)) | 324 (car list)) |
325 new)) | 325 new)) |
326 (setq list (cdr list))) | 326 (setq list (cdr list))) |
327 (setq list (nreverse new)))) | 327 (setq list (nreverse new)))) |
328 (with-output-to-temp-buffer "*Completions*" | 328 (with-output-to-temp-buffer "*Completions*" |
329 (display-completion-list list)) | 329 (display-completion-list list))) |
330 (when temp-buffer-shrink-to-fit | |
331 (shrink-window-if-larger-than-buffer | |
332 (get-buffer-window "*Completions*")))) | |
333 (message "Making completion list...%s" "done"))))) | 330 (message "Making completion list...%s" "done"))))) |
334 | 331 |
335 ;;; lisp.el ends here | 332 ;;; lisp.el ends here |