Function: srecode-overlaid-activate

srecode-overlaid-activate is a byte-compiled function without a source file.

Signature

(srecode-overlaid-activate &rest ARGS)

Implementations

(srecode-overlaid-activate (FIELD srecode-field)) in `srecode/fields.el'.

Activate the FIELD area.

(srecode-overlaid-activate (IR srecode-template-inserted-region)) in `srecode/fields.el'.

Activate the template area for IR.

(srecode-overlaid-activate (OLAID srecode-overlaid)) in `srecode/fields.el'.

Activate the overlaid area.

;; Could not find source code, showing raw function object. #[128 "\303\300\304\300! >\204�\305\306\307\300D\"\210\300\310H\304\300! >\204#�\305\306\307\300D\"\210\300\311H#\304\300! >\2046�\305\306\307\300D\"\210\300\312H\313K!\211<\203H�\314\315#\210K\203U�\315\316\")\210\317\"\207" [#s(cl--generic srecode-overlaid-activate ((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/cr364a2c0mcca19wxfy57q56hxdks5sh-emacs-31-1/share/emacs/31.1/lisp/emacs-lisp/eieio-core.elc" . 38417)]) #s(cl--generic-generalizer cl--generic-t-generalizer 0 #[385 "\300\207" [nil] 3 ("emacs-lisp/cl-generic.elc" . 7943)] #[385 "\300\207" [(t)] 3 ("emacs-lisp/cl-generic.elc" . 7968)]))) (#s(cl--generic-method (srecode-field) nil curried #[257 "\300!\210\301\302\303\"\207" [cl--generic-isnot-nnm-p nil make-closure #[128 "\301\302\300#\303\304#\207" [V0 make-closure #[128 "\302\301\206�\300\"\207" [V0 V1 apply] 4 ("/nix/store/cr364a2c0mcca19wxfy57q56hxdks5sh-emacs-31-1/share/emacs/31.1/lisp/cedet/srecode/fields.elc" . 1786)] apply #[514 " \210\301\302\"\303\211\304\305\306#\210\304\307#\210\304\310\311#\210\304\312\313#\210\304\314\311#\210\315!\262\316\211Tp#\262\304\317#\210\304\307#\210\304\305\306#\210\320\321#\207" [srecode-field-keymap eieio-oref overlay nil overlay-put face srecode-field-face keymap modification-hooks (srecode-field-mod-hook) insert-behind-hooks (srecode-field-behind-hook) insert-in-front-hooks overlay-end make-overlay srecode eieio-oset tail] 9 ("/nix/store/cr364a2c0mcca19wxfy57q56hxdks5sh-emacs-31-1/share/emacs/31.1/lisp/cedet/srecode/fields.elc" . 10040)]] 6 ("/nix/store/cr364a2c0mcca19wxfy57q56hxdks5sh-emacs-31-1/share/emacs/31.1/lisp/cedet/srecode/fields.elc" . 9998)]] 5 ("/nix/store/cr364a2c0mcca19wxfy57q56hxdks5sh-emacs-31-1/share/emacs/31.1/lisp/cedet/srecode/fields.elc" . 1693)]) #s(cl--generic-method (srecode-template-inserted-region) nil curried #[257 "\300!\210\301\302\303\"\207" [cl--generic-isnot-nnm-p nil make-closure #[128 "\301\302\300#\303\304#\207" [V0 make-closure #[128 "\302\301\206�\300\"\207" [V0 V1 apply] 4 ("/nix/store/cr364a2c0mcca19wxfy57q56hxdks5sh-emacs-31-1/share/emacs/31.1/lisp/cedet/srecode/fields.elc" . 1786)] apply #[514 "\300\301\"\211\203�\211@\302!\266A\202�\210 \210\300\301\"@\303\300\304\"!b\266\305\306#\210\307\310\311\312\211$\207" [eieio-oref fields srecode-overlaid-activate overlay-start overlay eieio-oset active-region add-hook post-command-hook srecode-field-post-command t] 7 ("/nix/store/cr364a2c0mcca19wxfy57q56hxdks5sh-emacs-31-1/share/emacs/31.1/lisp/cedet/srecode/fields.elc" . 5798)]] 6 ("/nix/store/cr364a2c0mcca19wxfy57q56hxdks5sh-emacs-31-1/share/emacs/31.1/lisp/cedet/srecode/fields.elc" . 5749)]] 5 ("/nix/store/cr364a2c0mcca19wxfy57q56hxdks5sh-emacs-31-1/share/emacs/31.1/lisp/cedet/srecode/fields.elc" . 1693)]) #s(cl--generic-method (srecode-overlaid) nil nil #[257 "\300\301\"\302!\303!\304p\305\306%\307!\210\310\311#\210\312\301#\207" [eieio-oref overlay overlay-start overlay-end make-overlay nil t delete-overlay overlay-put srecode eieio-oset] 10 ("/nix/store/cr364a2c0mcca19wxfy57q56hxdks5sh-emacs-31-1/share/emacs/31.1/lisp/cedet/srecode/fields.elc" . 1850)])) nil #0) cl-struct-cl--generic-tags current-load-list cl--generic-make-next-function type-of signal wrong-type-argument cl--generic 2 3 1 get-advertised-calling-convention set-advertised-calling-convention nil defalias apply] 8 ("emacs-lisp/cl-generic.elc" . 40082)]