Debugger entered--Lisp error: (wrong-type-argument symbolp (lambda nil (interactive) (make-frame))) fboundp((lambda nil (interactive) (make-frame))) (and (fboundp generic) (get generic (quote eieio-method-obarray))) (if (and (fboundp generic) (get generic (quote eieio-method-obarray))) (progn (save-excursion (goto-char (point-min)) (if (re-search-forward " in `.+'.$" nil t) (progn (replace-match ".")))) (save-excursion (insert "\n\nThis is a generic function" (cond ((and (generic-primary-only-p generic) (generic-primary-only-one-p generic)) " with only one primary method") ((generic-primary-only-p generic) " with only primary methods") (t "")) ".\n\n") (insert (propertize "Implementations:\n\n" (quote face) (quote bold))) (let ((i 4) (prefix [":STATIC" ":BEFORE" ":PRIMARY" ":AFTER"])) (while (< i 7) (let ((gm ...)) (if gm (progn ...))) (setq i (1+ i))) (setq i 0) (while (< i 4) (let* ((gm ...) cname location) (while gm (setq cname ...) (insert "`") (help-insert-xref-button ... ... cname) (insert "' " ... " ") (let* ... ...) (insert "\n" ...) (if ... ...) (setq gm ...) (insert "\n"))) (setq i (1+ i))))))) eieio-help-generic((lambda nil (interactive) (make-frame))) run-hook-with-args(eieio-help-generic (lambda nil (interactive) (make-frame))) describe-function-1((lambda nil (interactive) (make-frame))) describe-key([pause] 1 nil) call-interactively(describe-key nil nil) command-execute(describe-key)