10. get-element-text 関数 ypooo.hatenablog.com (defun get-element-text (node class-name) (let ((els (get-elements-by-class-recursive node class-name))) (if (plusp (length els)) (string-trim '(#\Space #\Newline #\Tab #\Return #\ ) (or (plump:text (first els)) "")) ""))) 目的: node 内で特定の class-n…