Fix a bunch of custom types (thank you cus-test.el)

[gnu-emacs] / lisp / cedet / semantic / db-find.el

diff --git a/lisp/cedet/semantic/db-find.el b/lisp/cedet/semantic/db-find.el
index 2e4ca319a9da498b0a8b388954d5816f52eca26e..91b1e34b690ad699fd776767af7eaa3e57992196 100644 (file)
--- a/lisp/cedet/semantic/db-find.el
+++ b/lisp/cedet/semantic/db-find.el
@@ -130,12 +130,12 @@
 (declare-function ede-current-project "ede")
 
 (defvar semanticdb-find-throttle-custom-list
-  '(repeat (radio (const 'local)
-                 (const 'project)
-                 (const 'unloaded)
-                 (const 'system)
-                 (const 'recursive)
-                 (const 'omniscience)))
+  '(set (const local)
+       (const project)
+       (const unloaded)
+       (const system)
+       (const recursive)
+       (const omniscience))
   "Customization values for semanticdb find throttle.
 See `semanticdb-find-throttle' for details.")