Function: srecode-delete
srecode-delete is a byte-compiled function without a source file.
Signature
(srecode-delete &rest ARGS)
Implementations
(srecode-delete (OLAID srecode-field)) in `srecode/fields.el'.
Delete our secondary overlay.
(srecode-delete (IR srecode-template-inserted-region)) in `srecode/fields.el'.
Call into our base, but also clear out the fields.
(srecode-delete (OLAID srecode-overlaid)) in `srecode/fields.el'.
Delete the overlay from OLAID.
;; 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-delete ((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/4sqc1yyx22dax8qs94hnxkgyg1v6gqfn-emacs-snapshot/share/emacs/32.0.50/lisp/emacs-lisp/eieio-core.elc" . 38420)]) #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 (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/4sqc1yyx22dax8qs94hnxkgyg1v6gqfn-emacs-snapshot/share/emacs/32.0.50/lisp/cedet/srecode/fields.elc" . 1789)] apply #[514 "\300\301\302\"!\210\303\302\"\210 \207" [delete-overlay eieio-oref tail slot-makeunbound] 6 ("/nix/store/4sqc1yyx22dax8qs94hnxkgyg1v6gqfn-emacs-snapshot/share/emacs/32.0.50/lisp/cedet/srecode/fields.elc" . 10116)]] 6 ("/nix/store/4sqc1yyx22dax8qs94hnxkgyg1v6gqfn-emacs-snapshot/share/emacs/32.0.50/lisp/cedet/srecode/fields.elc" . 10069)]] 5 ("/nix/store/4sqc1yyx22dax8qs94hnxkgyg1v6gqfn-emacs-snapshot/share/emacs/32.0.50/lisp/cedet/srecode/fields.elc" . 1696)]) #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/4sqc1yyx22dax8qs94hnxkgyg1v6gqfn-emacs-snapshot/share/emacs/32.0.50/lisp/cedet/srecode/fields.elc" . 1789)] apply #[514 "\300\301\302#\210\303\304\305\306\"\"\210 \210\307\310\311\312#\207" [eieio-oset active-region nil mapc srecode-delete eieio-oref fields remove-hook post-command-hook srecode-field-post-command t] 7 ("/nix/store/4sqc1yyx22dax8qs94hnxkgyg1v6gqfn-emacs-snapshot/share/emacs/32.0.50/lisp/cedet/srecode/fields.elc" . 5801)]] 6 ("/nix/store/4sqc1yyx22dax8qs94hnxkgyg1v6gqfn-emacs-snapshot/share/emacs/32.0.50/lisp/cedet/srecode/fields.elc" . 5824)]] 5 ("/nix/store/4sqc1yyx22dax8qs94hnxkgyg1v6gqfn-emacs-snapshot/share/emacs/32.0.50/lisp/cedet/srecode/fields.elc" . 1696)]) #s(cl--generic-method (srecode-overlaid) nil nil #[257 "\300\301\302\"!\210\303\302\"\207" [delete-overlay eieio-oref overlay slot-makeunbound] 5 ("/nix/store/4sqc1yyx22dax8qs94hnxkgyg1v6gqfn-emacs-snapshot/share/emacs/32.0.50/lisp/cedet/srecode/fields.elc" . 1898)])) 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" . 40085)]