comparison lisp/prim/lisp.el @ 44:8d2a9b52c682 r19-15prefinal

Import from CVS: tag r19-15prefinal
author cvs
date Mon, 13 Aug 2007 08:55:10 +0200
parents 8fc7fe29b841
children 131b0175ea99
comparison
equal deleted inserted replaced
43:23cafc5d2038 44:8d2a9b52c682
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