Function: ede-detect-qtest

ede-detect-qtest is an interactive and byte-compiled function defined in detect.el.gz.

Signature

(ede-detect-qtest)

Documentation

Run a quick test for autodetecting on BUFFER.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/ede/detect.el.gz
;;; TEST
;;
;; A quick interactive testing fcn.
(defun ede-detect-qtest ()
  "Run a quick test for autodetecting on BUFFER."
  (interactive)
  (let ((start (current-time))
	(ans (ede-detect-directory-for-project default-directory)))
    (if ans
	(message "Project found in %d sec @ %s of type %s"
		 (time-convert (time-since start) 'integer)
		 (car ans)
		 (eieio-object-name-string (cdr ans)))
      (message "No Project found.") )))