--- a/lisp/cus-dep.el	Mon Aug 13 10:33:19 2007 +0200
+++ b/lisp/cus-dep.el	Mon Aug 13 10:34:13 2007 +0200
@@ -55,28 +55,26 @@
 ;; will not be generated.  This means that the directories where
 ;; nothing has changed will be skipped.
 
-;; The `custom-put' function, used by files generated by
-;; `Custom-make-dependencies', is a specialized function that updates
-;; a property (which must be a list of strings) with a new list of
-;; strings, eliminating the duplicates.  As it also adds an
-;; appropriate entry to a custom hash-table, *do not* use it outside
-;; of custom.  Its inner workings can change anytime, without prior
-;; notice.  `custom-put' is defined in `cus-load.el'.
+;; The `custom-add-loads' function, used by files generated by
+;; `Custom-make-dependencies', updates the symbol's `custom-loads'
+;; property (a list of strings) with a new list of strings,
+;; eliminating the duplicates.  Additionally, it adds the symbol to
+;; `custom-group-hash-table'.  It is defined in `cus-load.el'.
 
 ;; Example:
 
-;; (custom-put 'foo 'custom-loads '("bar" "baz"))
+;; (custom-add-loads 'foo 'custom-loads '("bar" "baz"))
 ;; (get 'foo 'custom-loads)
 ;;   => ("bar" "baz")
 ;;
-;; (custom-put 'foo 'custom-loads '("hmph" "baz" "quz"))
+;; (custom-add-loads 'foo 'custom-loads '("hmph" "baz" "quz"))
 ;; (get 'foo 'custom-loads)
 ;;   => ("bar" "baz" "hmph" "qux")
 
 ;; Obviously, this allows correct incremental loading of custom-load
-;; files.  This is not necessary under FSF (they use a simple `put'),
-;; since they have only *one* file.  With the advent of packages, we
-;; cannot afford the same luxury.
+;; files.  This is not necessary under FSF (they simply use `put'),
+;; since they have only one file with custom dependencies.  With the
+;; advent of packages, we cannot afford the same luxury.
 
 
 ;;; Code: