diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/cus-edit.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d495c71de1..21680c980f 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2004-04-05 Per Abrahamsen <[email protected]> + + * cus-edit.el (custom-add-parent-links): Changed unbound variable + `symbol' to `name'. + 2004-04-05 Jesper Harder <[email protected]> * info.el (info-apropos): New function. diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index 04570b1512..951b14f7f0 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el @@ -1963,7 +1963,7 @@ If INITIAL-STRING is non-nil, use that rather than \"Parent groups:\"." symbol) buttons) (setq parents (cons symbol parents)))))) - (and (null (get symbol 'custom-links)) ;No links of its own. + (and (null (get name 'custom-links)) ;No links of its own. (= (length parents) 1) ;A single parent. (let* ((links (get (car parents) 'custom-links)) (many (> (length links) 2))) |