Function: semantic-displayer-focus-request
semantic-displayer-focus-request is a byte-compiled function without a
source file.
Signature
(semantic-displayer-focus-request ARG &rest ARGS)
Aliases
semantic-displayor-focus-request (obsolete since 27.1)
Implementations
(semantic-displayer-focus-request (OBJ semantic-displayer-ghost)) in `semantic/complete.el'.
Focus in on possible tag completions. Focus is performed by cycling through the tags and showing a possible completion text in ghost text.
(semantic-displayer-focus-request (OBJ semantic-displayer-traditional-with-focus-highlight)) in `semantic/complete.el'.
Focus in on possible tag completions. Focus is performed by cycling through the tags and highlighting one in the source buffer.
(semantic-displayer-focus-request (OBJ semantic-displayer-abstract)) in `semantic/complete.el'.
A request to for the displayer to focus on some tag option.
;; Could not find source code, showing raw function object. #[385 "\304\305!\306\300\"\206\"\307\303\310\302\301\311\312\305!!\313\314!\"%\315\300#\210\262#\207" [#s(hash-table) (#s(cl--generic-method (semantic-displayer-ghost) nil nil #[257 "\300\301\302\"!\303!\211@\211\204\304\305!\207\306\307\"\203#\310\301\307\"!\204/\311\307\312``Tp\313$#\210\314 @G\315O\301\307\"\316\317G\320\321%\210\322\323``T{P#\266\314 @\260\316GG\320\324%\210\304\325\326\301\n\327\"T $!\207" [semanticdb-find-result-length eieio-oref table semantic-displayer-focus-tag semantic-completion-message "No tags to focus on." slot-boundp ghostoverlay overlay-buffer eieio-oset make-overlay t semantic-completion-text nil put-text-property 0 face region overlay-put display bold format "%s [%d of %d matches]" focus] 13 ("/nix/store/yvwy8dm26cpa1j12ixgs1dyiaw2abdk9-emacs-snapshot/share/emacs/31.0.50/lisp/cedet/semantic/complete.elc" . 58799)]) #s(cl--generic-method (semantic-displayer-traditional-with-focus-highlight) nil nil #[257 "\300\301\302\"!\303!\211@A\304\"\211A@\305 \204!\262\262\306!\206.\205.\307!\211\204er\310\311!q\210\312 \210\313c\210\314\315\316#\317\261\210\203U\320c\210\321!\317\261\210\211\203b\322c\210\323\324\"c\210\210p)\325!\203t\326\325!!\210\202\327\316\"\210\326\325!!\210\330!\203\246\211\3318\262\332!\203\232\333!\266\202\202\237\211\334H\266\202b\210\335\336 !\210\326!\210\337 @\211G\315O\340\323\341\301\342\"T$!\207" [semanticdb-find-result-length eieio-oref table semantic-displayer-focus-tag semanticdb-normalize-one-tag selected-window semantic-tag-buffer semanticdb-get-buffer get-buffer-create "*Completion Focus*" erase-buffer "Focus on tag: \n" semantic-format-tag-summarize nil t "\n\n" "From table: \n" eieio-object-name "In buffer: \n\n" format "%S" get-buffer-window select-window switch-to-buffer-other-window semantic-tag-with-position-p 4 overlayp overlay-start 0 semantic-momentary-highlight-tag semantic-current-tag semantic-completion-text semantic-completion-message "%s [%d of %d matches]" focus] 20 ("/nix/store/yvwy8dm26cpa1j12ixgs1dyiaw2abdk9-emacs-snapshot/share/emacs/31.0.50/lisp/cedet/semantic/complete.elc" . 49329)]) #s(cl--generic-method (semantic-displayer-abstract) nil nil #[257 "\300 \207" [ding] 2 ("/nix/store/yvwy8dm26cpa1j12ixgs1dyiaw2abdk9-emacs-snapshot/share/emacs/31.0.50/lisp/cedet/semantic/complete.elc" . 39793)])) nil #s(cl--generic semantic-displayer-focus-request ((0 #s(cl--generic-generalizer eieio--generic-generalizer 50 cl--generic-struct-tag #[385 "\301N\302!>\205\303!\207" [cl-struct-eieio--class-tags cl--class type-of cl--class-allparents] 5 ("/nix/store/yvwy8dm26cpa1j12ixgs1dyiaw2abdk9-emacs-snapshot/share/emacs/31.0.50/lisp/emacs-lisp/eieio-core.elc" . 38466)]) #s(cl--generic-generalizer cl--generic-t-generalizer 0 #[385 "\300\207" [nil] 3 ("emacs-lisp/cl-generic.elc" . 7946)] #[385 "\300\207" [(t)] 3 ("emacs-lisp/cl-generic.elc" . 7971)]))) (#s(cl--generic-method (semantic-displayer-ghost) nil nil #[257 "\300\301\302\"!\303!\211@\211\204\304\305!\207\306\307\"\203#\310\301\307\"!\204/\311\307\312``Tp\313$#\210\314 @G\315O\301\307\"\316\317G\320\321%\210\322\323``T{P#\266\314 @\260\316GG\320\324%\210\304\325\326\301\n\327\"T $!\207" [semanticdb-find-result-length eieio-oref table semantic-displayer-focus-tag semantic-completion-message "No tags to focus on." slot-boundp ghostoverlay overlay-buffer eieio-oset make-overlay t semantic-completion-text nil put-text-property 0 face region overlay-put display bold format "%s [%d of %d matches]" focus] 13 ("/nix/store/yvwy8dm26cpa1j12ixgs1dyiaw2abdk9-emacs-snapshot/share/emacs/31.0.50/lisp/cedet/semantic/complete.elc" . 58799)]) #s(cl--generic-method (semantic-displayer-traditional-with-focus-highlight) nil nil #[257 "\300\301\302\"!\303!\211@A\304\"\211A@\305 \204!\262\262\306!\206.\205.\307!\211\204er\310\311!q\210\312 \210\313c\210\314\315\316#\317\261\210\203U\320c\210\321!\317\261\210\211\203b\322c\210\323\324\"c\210\210p)\325!\203t\326\325!!\210\202\327\316\"\210\326\325!!\210\330!\203\246\211\3318\262\332!\203\232\333!\266\202\202\237\211\334H\266\202b\210\335\336 !\210\326!\210\337 @\211G\315O\340\323\341\301\342\"T$!\207" [semanticdb-find-result-length eieio-oref table semantic-displayer-focus-tag semanticdb-normalize-one-tag selected-window semantic-tag-buffer semanticdb-get-buffer get-buffer-create "*Completion Focus*" erase-buffer "Focus on tag: \n" semantic-format-tag-summarize nil t "\n\n" "From table: \n" eieio-object-name "In buffer: \n\n" format "%S" get-buffer-window select-window switch-to-buffer-other-window semantic-tag-with-position-p 4 overlayp overlay-start 0 semantic-momentary-highlight-tag semantic-current-tag semantic-completion-text semantic-completion-message "%s [%d of %d matches]" focus] 20 ("/nix/store/yvwy8dm26cpa1j12ixgs1dyiaw2abdk9-emacs-snapshot/share/emacs/31.0.50/lisp/cedet/semantic/complete.elc" . 49329)]) #s(cl--generic-method (semantic-displayer-abstract) nil nil #[257 "\300 \207" [ding] 2 ("/nix/store/yvwy8dm26cpa1j12ixgs1dyiaw2abdk9-emacs-snapshot/share/emacs/31.0.50/lisp/cedet/semantic/complete.elc" . 39793)])) nil) apply cl-type-of gethash cl--generic-cache-miss 0 append #[385 "\301N\302!>\205\303!\207" [cl-struct-eieio--class-tags cl--class type-of cl--class-allparents] 5 ("/nix/store/yvwy8dm26cpa1j12ixgs1dyiaw2abdk9-emacs-snapshot/share/emacs/31.0.50/lisp/emacs-lisp/eieio-core.elc" . 38466)] #[385 "\300\207" [(t)] 3 ("emacs-lisp/cl-generic.elc" . 7971)] nil puthash] 13 "\n\n(fn ARG &rest ARGS)"]