Function: data-debug-insert-stuff-vector-button

data-debug-insert-stuff-vector-button is a byte-compiled function defined in data-debug.el.gz.

Signature

(data-debug-insert-stuff-vector-button STUFFVECTOR PREFIX PREBUTTONTEXT)

Documentation

Insert a button representing STUFFVECTOR.

PREFIX is the text that precedes the button. PREBUTTONTEXT is some text between prefix and the stuff vector button.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/data-debug.el.gz
(defun data-debug-insert-stuff-vector-button (stuffvector
					    prefix
					    prebuttontext)
  "Insert a button representing STUFFVECTOR.
PREFIX is the text that precedes the button.
PREBUTTONTEXT is some text between prefix and the stuff vector button."
  (let* ((start (point))
	 (end nil)
	 (str (format "#<vector o' stuff: %d entries>" (length stuffvector)))
	 (tip str))
    (insert prefix prebuttontext str)
    (setq end (point))
    (put-text-property (- end (length str)) end 'face 'font-lock-variable-name-face)
    (put-text-property start end 'ddebug stuffvector)
    (put-text-property start end 'ddebug-indent (length prefix))
    (put-text-property start end 'ddebug-prefix prefix)
    (put-text-property start end 'help-echo tip)
    (put-text-property start end 'ddebug-function
		       'data-debug-insert-stuff-vector-from-point)
    (insert "\n")
    )
  )