From: Thien-Thi Nguyen Date: Sat, 27 May 2006 08:56:11 +0000 (+0000) Subject: (ewoc--create): No longer take X-Git-Tag: emacs-pretest-22.0.90~2267 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f860b7216f200b4836f07a745fd8f1ddc39480ed;p=emacs.git (ewoc--create): No longer take HEADER and FOOTER args. Update unique caller. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 6a617c3d079..888d793e621 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2006-05-27 Thien-Thi Nguyen + + * emacs-lisp/ewoc.el (ewoc--create): No longer + take HEADER and FOOTER args. Update unique caller. + 2006-05-27 Mathias Dahl * dired.el (dired-mode-map): Change `tumme-tag-remove' to diff --git a/lisp/emacs-lisp/ewoc.el b/lisp/emacs-lisp/ewoc.el index 6f14fb37cf5..d1ededc583d 100644 --- a/lisp/emacs-lisp/ewoc.el +++ b/lisp/emacs-lisp/ewoc.el @@ -183,8 +183,7 @@ and (ewoc--node-nth -1) returns the last node." (defstruct (ewoc (:constructor nil) - (:constructor ewoc--create - (buffer pretty-printer header footer dll)) + (:constructor ewoc--create (buffer pretty-printer dll)) (:conc-name ewoc--)) buffer pretty-printer header footer dll last-node) @@ -280,9 +279,9 @@ respectively, of the ewoc." (dll (progn (setf (ewoc--node-right dummy-node) dummy-node) (setf (ewoc--node-left dummy-node) dummy-node) dummy-node)) - (new-ewoc - (ewoc--create (current-buffer) - pretty-printer nil nil dll)) + (new-ewoc (ewoc--create (current-buffer) + pretty-printer + dll)) (pos (point)) head foot) (ewoc--set-buffer-bind-dll new-ewoc