Function: custom-hook-convert-widget

custom-hook-convert-widget is a byte-compiled function defined in cus-edit.el.gz.

Signature

(custom-hook-convert-widget WIDGET)

Source Code

;; Defined in /usr/src/emacs/lisp/cus-edit.el.gz
(defun custom-hook-convert-widget (widget)
  ;; Handle `:options'.
  (let* ((options (widget-get widget :options))
	 (other '(editable-list :inline t
				:entry-format "%i %d%v"
				(function :format " %v")))
	 (args (if options
		   (list `(checklist :inline t
				     ,@(mapcar (lambda (entry)
						 `(function-item ,entry))
					       options))
			 other)
		 (list other))))
    (widget-put widget :args args)
    widget))