From a93dceda3fdcca18b51cb96461e1b8a4fc61bfd7 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Fri, 11 Oct 2019 13:54:30 -0400 Subject: * lisp/cedet/mode-local.el (define-overload): Declare obsolete * lisp/cedet/srecode/ctxt.el (srecode-calculate-context): * lisp/cedet/srecode/semantic.el (srecode-semantic-apply-tag-to-dict) (srecode-semantic-find-template): Use define-overloadable-function instead. --- lisp/cedet/srecode/semantic.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/cedet/srecode/semantic.el') diff --git a/lisp/cedet/srecode/semantic.el b/lisp/cedet/srecode/semantic.el index 1e1a60e0245..344b908da32 100644 --- a/lisp/cedet/srecode/semantic.el +++ b/lisp/cedet/srecode/semantic.el @@ -89,7 +89,7 @@ If this is nil, then `senator-tag-ring' is used.") The hook is called with two arguments, the TAG and DICT to be augmented.") -(define-overload srecode-semantic-apply-tag-to-dict (tagobj dict) +(define-overloadable-function srecode-semantic-apply-tag-to-dict (tagobj dict) "Insert features of TAGOBJ into the dictionary DICT. TAGOBJ is an object of class `srecode-semantic-tag'. This class is a compound inserter value. @@ -227,7 +227,7 @@ Assumes the cursor is in a tag of class type. If not, throw an error." ;;; INSERT A TAG API ;; ;; Routines that take a tag, and insert into a buffer. -(define-overload srecode-semantic-find-template (class prototype ctxt) +(define-overloadable-function srecode-semantic-find-template (class prototype ctxt) "Find a template for a tag of class CLASS based on context. PROTOTYPE is non-nil if we want a prototype template instead." ) -- cgit v1.2.3