用法
评论
建议
取 消
确 定
(defun vectra:xprop-get (ename appname names / xdata rv) (setq xdata (vectra:xdata-get ename appname)) (cond ((atom names) (while xdata (if (= names (cdar xdata)) (setq rv (cdadr xdata) xdata nil)) (setq xdata (cddr xdata)))) ((vl-consp names) (while xdata (if (member (cdar xdata) names) (setq rv (cons (cons (cdar xdata) (cdadr xdata)) rv) names (vl-remove (cdar xdata) names))) (setq xdata (cddr xdata))))) rv)
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 733 个
函数库类别: 51 种
上传记录
刷新