Function: srecode-overlaid-text
srecode-overlaid-text is a byte-compiled function without a source
file.
Signature
(srecode-overlaid-text ARG &rest ARGS)
Implementations
(srecode-overlaid-text (OLAID srecode-overlaid) &optional SET-TO) in `srecode/fields.el'.
Return the text under OLAID. If SET-TO is a string, then replace the text of OLAID with SET-TO.
;; 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-overlaid) nil nil #[513 "\300\301\"\302!;\204\303\304!\"\207\212\211\304!|\210\211b\210c\210\305\211G\\#)\210\306\207" [eieio-oref overlay overlay-start buffer-substring-no-properties overlay-end move-overlay nil] 9 "Return the text under OLAID.\nIf SET-TO is a string, then replace the text of OLAID with SET-TO.\n\n(fn OLAID &optional SET-TO)"])) nil #s(cl--generic srecode-overlaid-text ((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-overlaid) nil nil #[513 "\300\301\"\302!;\204\303\304!\"\207\212\211\304!|\210\211b\210c\210\305\211G\\#)\210\306\207" [eieio-oref overlay overlay-start buffer-substring-no-properties overlay-end move-overlay nil] 9 "Return the text under OLAID.\nIf SET-TO is a string, then replace the text of OLAID with SET-TO.\n\n(fn OLAID &optional SET-TO)"])) 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)"]