Show
Ignore:
Timestamp:
05/18/06 16:19:18 (3 years ago)
Author:
miyoshi
Message:

Sync up with Emacs CVS HEAD.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/lisp/emacs-lisp/ewoc.el

    r4079 r4085  
    281281    new-ewoc)) 
    282282 
    283 (defalias 'ewoc-data 'ewoc--node-data) 
     283(defalias 'ewoc-data 'ewoc--node-data 
     284  "Extract the data encapsulated by NODE and return it. 
     285 
     286\(fn NODE)") 
    284287 
    285288(defun ewoc-enter-first (ewoc data) 
    …… 
    330333Thus, (ewoc-nth dll 0) returns the first node, 
    331334and (ewoc-nth dll -1) returns the last node. 
    332 Use `ewoc--node-data' to extract the data from the node." 
     335Use `ewoc-data' to extract the data from the node." 
    333336  ;; Skip the header (or footer, if n is negative). 
    334337  (setq n (if (< n 0) (1- n) (1+ n))) 
    …… 
    350353  (ewoc--set-buffer-bind-dll-let* ewoc 
    351354      ((footer (ewoc--footer ewoc)) 
     355       (pp (ewoc--pretty-printer ewoc)) 
    352356       (node (ewoc--node-nth dll 1))) 
    353357    (save-excursion 
    354358      (while (not (eq node footer)) 
    355359        (if (apply map-function (ewoc--node-data node) args) 
    356             (ewoc--refresh-node (ewoc--pretty-printer ewoc) node)) 
     360            (ewoc--refresh-node pp node)) 
    357361        (setq node (ewoc--node-next dll node)))))) 
    358362 
    …… 
    463467  "Call EWOC's pretty-printer for each element in NODES. 
    464468Delete current text first, thus effecting a \"refresh\"." 
    465   (ewoc--set-buffer-bind-dll ewoc 
     469  (ewoc--set-buffer-bind-dll-let* ewoc 
     470      ((pp (ewoc--pretty-printer ewoc))) 
    466471    (save-excursion 
    467472      (dolist (node nodes) 
    468         (ewoc--refresh-node (ewoc--pretty-printer ewoc) node))))) 
     473        (ewoc--refresh-node pp node))))) 
    469474 
    470475(defun ewoc-goto-prev (ewoc arg)