Function: srecode-overlaid-activate

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

Signature

(srecode-overlaid-activate ARG &rest ARGS)

Implementations

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

Undocumented

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

Undocumented

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

Activate the overlaid area.

;; Could not find source code, showing raw function object. #[385 "\304\203�\305!\202\f�\306\307
\300\"\2066�\310\303\311\302\301\312\313\n\203&�\305!\202'�\306!\314\315!\"%\316\300#\210\211\262
\262
#\207" [#s(hash-table size 65 test eql rehash-size 1.5 rehash-threshold 0.8125 data ()) (#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 "\n\n(fn &rest ARGS)"] apply #[514 "
\210\301
\302\"\303\211\304\305\306#\210\304\307#\210\304\310\311#\210\304\312\313#\210\304\314\315#\210\316!\262\317\211Tp#\262
\304
\320#\210\304
\307#\210\304
\305\306#\210\321\322#\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 (srecode-field-mod-hook) overlay-end make-overlay srecode eieio-oset tail] 9 "\n\n(fn CL--CNM FIELD)"]] 6 "Activate the FIELD area.\n\n(fn FIELD)"]] 5 "\n\n(fn CL--NM)"]) #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 "\n\n(fn &rest ARGS)"] apply #[514 "\300
\301\"\211\203�\211@\302
!\210
A\266\202\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 "\n\n(fn CL--CNM IR)"]] 6 "Activate the template area for IR.\n\n(fn IR)"]] 5 "\n\n(fn CL--NM)"]) #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 "Activate the overlaid area.\n\n(fn OLAID)"])) nil #s(cl--generic srecode-overlaid-activate ((0 #s(cl--generic-generalizer eieio--generic-generalizer 50 cl--generic-struct-tag #[385 "
\301N\302
!>\205�\303\304\305!\"\207" [cl-struct-eieio--class-tags cl--class type-of mapcar eieio--class-name eieio--class-precedence-list] 7 "\n\n(fn TAG &rest _)"]) #s(cl--generic-generalizer cl--generic-t-generalizer 0 #[385 "\300\207" [nil] 3 "\n\n(fn NAME &rest _)"] #[385 "\300\207" [(t)] 3 "\n\n(fn TAG &rest _)"]))) (#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 "\n\n(fn &rest ARGS)"] apply #[514 "
\210\301
\302\"\303\211\304\305\306#\210\304\307#\210\304\310\311#\210\304\312\313#\210\304\314\315#\210\316!\262\317\211Tp#\262
\304
\320#\210\304
\307#\210\304
\305\306#\210\321\322#\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 (srecode-field-mod-hook) overlay-end make-overlay srecode eieio-oset tail] 9 "\n\n(fn CL--CNM FIELD)"]] 6 "Activate the FIELD area.\n\n(fn FIELD)"]] 5 "\n\n(fn CL--NM)"]) #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 "\n\n(fn &rest ARGS)"] apply #[514 "\300
\301\"\211\203�\211@\302
!\210
A\266\202\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 "\n\n(fn CL--CNM IR)"]] 6 "Activate the template area for IR.\n\n(fn IR)"]] 5 "\n\n(fn CL--NM)"]) #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 "Activate the overlaid area.\n\n(fn OLAID)"])) nil) apply type-of null gethash cl--generic-cache-miss 0 append #[385 "
\301N\302
!>\205�\303\304\305!\"\207" [cl-struct-eieio--class-tags cl--class type-of mapcar eieio--class-name eieio--class-precedence-list] 7 "\n\n(fn TAG &rest _)"] #[385 "\300\207" [(t)] 3 "\n\n(fn TAG &rest _)"] nil puthash] 13 "\n\n(fn ARG &rest ARGS)"]