From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Thu, 19 Sep 2002 05:11:48 +0000 (+0000)
Subject: (ewoc--node-branch): Add docstring.
X-Git-Tag: ttn-vms-21-2-B4~13111
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=21311ac9ecce18e75bdd7a965b7aa8369753e7ee;p=emacs.git

(ewoc--node-branch): Add docstring.
---

diff --git a/lisp/emacs-lisp/ewoc.el b/lisp/emacs-lisp/ewoc.el
index d870929c21a..954a2afd514 100644
--- a/lisp/emacs-lisp/ewoc.el
+++ b/lisp/emacs-lisp/ewoc.el
@@ -138,7 +138,10 @@
 	    (:constructor ewoc--node-create (start-marker data)))
   left right data start-marker)
 
-(defalias 'ewoc--node-branch 'aref)
+(defalias 'ewoc--node-branch 'aref
+  "Get the left (CHILD=0) or right (CHILD=1) child of the NODE.
+
+\(fn NODE CHILD)")
 
 (defun ewoc--dll-create ()
   "Create an empty doubly linked list."