(ewoc-data): Add docstring.

(ewoc-nth): Doc fix.

2 files changed, 11 insertions, 3 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 57158e5e9b9..85e397cbe29 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,10 +1,15 @@
+2006-05-17  Thien-Thi Nguyen  <ttn@gnu.org>
+
+        * emacs-lisp/ewoc.el (ewoc-data): Add docstring.
+        (ewoc-nth): Doc fix.
+
 2006-05-16  Eli Zaretskii  <eliz@gnu.org>
 
         * international/mule.el (auto-coding-alist): Add .lha to files
         read with no-conversion.
 
         * files.el (auto-mode-alist): Add .lha files to archive file
-        extensions. 
+        extensions.
 
         * arc-mode.el (archive-arc-summarize, archive-lzh-summarize):
         Convert csize to integer when computing offsets within the
diff --git a/lisp/emacs-lisp/ewoc.el b/lisp/emacs-lisp/ewoc.el
index d64991e5415..fa85ce21fb0 100644
--- a/lisp/emacs-lisp/ewoc.el
+++ b/lisp/emacs-lisp/ewoc.el
@@ -280,7 +280,10 @@ be inserted at the bottom of the ewoc."
     ;; Return the ewoc
     new-ewoc))
 
-(defalias 'ewoc-data 'ewoc--node-data)
+(defalias 'ewoc-data 'ewoc--node-data
+  "Extract the data encapsulated by NODE and return it.
+
+\(fn NODE)")
 
 (defun ewoc-enter-first (ewoc data)
   "Enter DATA first in EWOC.
@@ -329,7 +332,7 @@ N counts from zero.  Return nil if there is less than N elements.
 If N is negative, return the -(N+1)th last element.
 Thus, (ewoc-nth dll 0) returns the first node,
 and (ewoc-nth dll -1) returns the last node.
-Use `ewoc--node-data' to extract the data from the node."
+Use `ewoc-data' to extract the data from the node."
   ;; Skip the header (or footer, if n is negative).
   (setq n (if (< n 0) (1- n) (1+ n)))
   (ewoc--filter-hf-nodes ewoc