diff options
| author | Thien-Thi Nguyen <ttn@gnuvola.org> | 2006-05-27 08:56:11 +0000 |
|---|---|---|
| committer | Thien-Thi Nguyen <ttn@gnuvola.org> | 2006-05-27 08:56:11 +0000 |
| commit | f860b7216f200b4836f07a745fd8f1ddc39480ed (patch) | |
| tree | e14b5965ad5c675a3ca1c8384fbcde87fc1b4dd7 /lisp/emacs-lisp | |
| parent | 412f3f1859b20e13d0d16f55852975c7ed74fa53 (diff) | |
| download | emacs-f860b7216f200b4836f07a745fd8f1ddc39480ed.tar.gz emacs-f860b7216f200b4836f07a745fd8f1ddc39480ed.tar.bz2 emacs-f860b7216f200b4836f07a745fd8f1ddc39480ed.zip | |
(ewoc--create): No longer take
HEADER and FOOTER args. Update unique caller.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/ewoc.el | 9 |
1 files changed, 4 insertions, 5 deletions
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 |