Is there an existing function which performs the following?

(defun debug-on-entry-at-point ()
  "Perform \\[debug-on-entry] on the function at point."
  (let ((fn (function-called-at-point)))
    (if fn
        (debug-on-entry fn)
      (message "No function at point"))))

-- 
"Cut your own wood and it will warm you twice"
        Regards, Yoni Rabkin Katzenell



_______________________________________________
Emacs-devel mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-devel

Reply via email to