From: Thien-Thi Nguyen <ttn@gnuvola.org>
Date: Wed, 17 May 2006 06:12:44 +0000 (+0000)
Subject: (ewoc-data): Add docstring.
X-Git-Tag: emacs-pretest-22.0.90~2538
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8d1bec8de1c570475c1332d1305bea21ffda44f1;p=emacs.git

(ewoc-data): Add docstring.
(ewoc-nth): Doc fix.
---

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