unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
From: Sam Steingold <sds@podval.org>
Subject: pcvs & ewoc again
Date: Tue, 30 May 2006 10:57:47 -0400	[thread overview]
Message-ID: <alu077y2z8.fsf@quant8.janestcapital.quant> (raw)

GNU Emacs 22.0.50.3 (i686-pc-linux-gnu, X toolkit, Xaw3d scroll bars)
 of 2006-05-30 on quant8

Debugger entered--Lisp error: (wrong-number-of-arguments (lambda (pretty-printer &optional header footer) "Create an empty ewoc.

The ewoc will be inserted in the current buffer at the current position.

PRETTY-PRINTER should be a function that takes one argument, an
element, and inserts a string representing it in the buffer (at
point). The string PRETTY-PRINTER inserts may be empty or span
several linse. A trailing newline will always be inserted
automatically. The PRETTY-PRINTER should use insert, and not
insert-before-markers.

Optional third argument HEADER is a string that will always be
present at the top of the ewoc. HEADER should end with a
newline.  Optionaly fourth argument FOOTER is similar, and will
be inserted at the bottom of the ewoc." (let ((new-ewoc (ewoc--create (current-buffer) pretty-printer nil nil (ewoc--dll-create))) (pos (point))) (ewoc--set-buffer-bind-dll new-ewoc (unless header (setq header "")) (unless footer (setq footer "")) (setf (ewoc--node-start-marker dll) (copy-marker pos)) (let ((foot (ewoc--create-node footer (lambda (x) (insert footer)) pos)) (head (ewoc--create-node header (lambda (x) (insert header)) pos))) (ewoc--node-enter-first dll head) (ewoc--node-enter-last dll foot) (setf (ewoc--header new-ewoc) head) (setf (ewoc--footer new-ewoc) foot))) new-ewoc)) 4)
  ewoc-create(cvs-fileinfo-pp "\n\n" "\n" t)
  cvs-make-cvs-buffer("~/src/clisp/current/" nil)
  cvs-cmd-do("update" "/home/sds/src/clisp/current/" ("-dP") nil nil :cvsargs ("-n") :noshow nil :dont-change-disc t)
  cvs-examine("/home/sds/src/clisp/current/" t)
  #[nil "Á\bÂ\"‡" [default-directory cvs-examine t] 3]()
  #[nil "rÁ\b!ƒ\r\0Â\b!‚\x0f\0\b )‡" [-cvs-mode!-fun commandp call-interactively] 2]()
  cvs-mode!(#[nil "Á\bÂ\"‡" [default-directory cvs-examine t] 3])
  cvs-mode-revert-buffer()
  call-interactively(cvs-mode-revert-buffer)


-- 
Sam Steingold (http://www.podval.org/~sds) on Fedora Core release 5 (Bordeaux)
http://openvotingconsortium.org http://honestreporting.com http://memri.org
http://dhimmi.com http://camera.org http://mideasttruth.com
Just because you're paranoid doesn't mean they AREN'T after you.

             reply	other threads:[~2006-05-30 14:57 UTC|newest]

Thread overview: 2+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2006-05-30 14:57 Sam Steingold [this message]
2006-05-30 16:38 ` pcvs & ewoc again Thien-Thi Nguyen

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.gnu.org/software/emacs/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=alu077y2z8.fsf@quant8.janestcapital.quant \
    --to=sds@podval.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).