Mercurial > emacs

comparison lisp/pcvs.el @ 71007:4f58e5dcbbc0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(cvs-make-cvs-buffer): Specify NOSEP to `ewoc-create'.
author Thien-Thi Nguyen <ttn@gnuvola.org>
date Sat, 27 May 2006 17:41:18 +0000
parents e5bae689766e
children 1405144e8610 a8190f7e546e
comparison
equal deleted inserted replaced
71006:103ed71d4639 71007:4f58e5dcbbc0
465 "\n") 465 "\n")
466 (setq buffer-read-only t) 466 (setq buffer-read-only t)
467 (cvs-mode) 467 (cvs-mode)
468 (set (make-local-variable 'list-buffers-directory) buffer-name) 468 (set (make-local-variable 'list-buffers-directory) buffer-name)
469 ;;(set (make-local-variable 'cvs-temp-buffer) (cvs-temp-buffer)) 469 ;;(set (make-local-variable 'cvs-temp-buffer) (cvs-temp-buffer))
470 (let ((cookies (ewoc-create 'cvs-fileinfo-pp "\n\n" "\n"))) 470 (let ((cookies (ewoc-create 'cvs-fileinfo-pp "\n\n" "\n" t)))
471 (set (make-local-variable 'cvs-cookies) cookies) 471 (set (make-local-variable 'cvs-cookies) cookies)
472 (add-hook 'kill-buffer-hook 472 (add-hook 'kill-buffer-hook
473 (lambda () 473 (lambda ()
474 (ignore-errors (kill-buffer cvs-temp-buffer))) 474 (ignore-errors (kill-buffer cvs-temp-buffer)))
475 nil t) 475 nil t)