(defmacro polyedit-set-toggle-key (toggle-key &rest args) (let* ((docp (stringp (car args))) (doc (if docp (car args) '((interactive)))) (ar (if docp (cdr args) args))) `(let ((func (gentemp "polyedit-toggle-mover"))) (si:*fset func (si:*s…
引用をストックしました
引用するにはまずログインしてください
引用をストックできませんでした。再度お試しください
限定公開記事のため引用できません。