Function: data-debug-insert-process-button

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

Signature

(data-debug-insert-process-button PROCESS PREFIX PREBUTTONTEXT)

Documentation

Insert a button representing PROCESS.

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

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/data-debug.el.gz
(defun data-debug-insert-process-button (process prefix prebuttontext)
  "Insert a button representing PROCESS.
PREFIX is the text that precedes the button.
PREBUTTONTEXT is some text between prefix and the process button."
  (let ((start (point))
	(end nil)
	(str (format "%S : %s" process (process-status process)))
	) ;; (tip nil)
    (insert prefix prebuttontext str)
    (setq end (point))
    (put-text-property (- end (length str)) end 'face 'font-lock-comment-face)
    (put-text-property start end 'ddebug process)
    (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-process-from-point)
    (insert "\n")
    )
  )