diff options
Diffstat (limited to 'lisp/cedet')
| -rw-r--r-- | lisp/cedet/semantic/complete.el | 31 |
1 files changed, 16 insertions, 15 deletions
diff --git a/lisp/cedet/semantic/complete.el b/lisp/cedet/semantic/complete.el index 2597a431e18..dc270603a0c 100644 --- a/lisp/cedet/semantic/complete.el +++ b/lisp/cedet/semantic/complete.el @@ -314,6 +314,22 @@ HISTORY is a symbol representing a variable to story the history in." ;; Abstract baseclass for any displayer which supports focus + +(defclass semantic-displayer-abstract () + ((table :type (or null semanticdb-find-result-with-nil) + :initform nil + :protection :protected + :documentation "List of tags this displayer is showing.") + (last-prefix :type string + :protection :protected + :documentation "Prefix associated with slot `table'.") + ) + "Abstract displayer baseclass. +Manages the display of some number of tags. +Provides the basics for a displayer, including interacting with +a collector, and tracking tables of completion to display." + :abstract t) + (defclass semantic-displayer-focus-abstract (semantic-displayer-abstract) ((focus :type number :protection :protected @@ -1317,21 +1333,6 @@ Uses semanticdb for searching all tags in the current project." ;; * semantic-displayer-scroll-request ;; * semantic-displayer-focus-request -(defclass semantic-displayer-abstract () - ((table :type (or null semanticdb-find-result-with-nil) - :initform nil - :protection :protected - :documentation "List of tags this displayer is showing.") - (last-prefix :type string - :protection :protected - :documentation "Prefix associated with slot `table'.") - ) - "Abstract displayer baseclass. -Manages the display of some number of tags. -Provides the basics for a displayer, including interacting with -a collector, and tracking tables of completion to display." - :abstract t) - (define-obsolete-function-alias 'semantic-displayor-cleanup #'semantic-displayer-cleanup "27.1") (cl-defmethod semantic-displayer-cleanup ((_obj semantic-displayer-abstract)) |