Mercurial > hg > xemacs-beta

comparison lisp/prim/lisp.el @ 98:0d2f883870bc r20-1b1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b1
author cvs
date Mon, 13 Aug 2007 09:13:56 +0200
parents c0c698873ce1
children 9f59509498e1
comparison
equal deleted inserted replaced
97:498bf5da1c90 98:0d2f883870bc
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 (shrink-window-if-larger-than-buffer 330 (when temp-buffer-shrink-to-fit
331 (get-buffer-window "*Completions*"))) 331 (shrink-window-if-larger-than-buffer
332 (get-buffer-window "*Completions*"))))
332 (message "Making completion list...%s" "done"))))) 333 (message "Making completion list...%s" "done")))))
333 334
334 ;;; lisp.el ends here 335 ;;; lisp.el ends here