diff lisp/cus-edit.el @ 456:e7ef97881643 r21-2-43

Import from CVS: tag r21-2-43
author cvs
date Mon, 13 Aug 2007 11:41:24 +0200
parents 576fb035e263
children 6a8b2ec80a19
line wrap: on
line diff
--- a/lisp/cus-edit.el	Mon Aug 13 11:40:56 2007 +0200
+++ b/lisp/cus-edit.el	Mon Aug 13 11:41:24 2007 +0200
@@ -304,7 +304,8 @@
 		obarray (lambda (symbol)
 			  (and (boundp symbol)
 			       (or (get symbol 'custom-type)
-				   (user-variable-p symbol)))) t))
+				   (user-variable-p symbol)))) 
+                t nil nil (and v (symbol-name v))))
      (list (if (equal val "")
 	       (if (symbolp v) v nil)
 	     (intern val)))))