我觉得插件冲突不是它排第一位的关系,试试下面的看看能改变你的顺序吗。
- ;;;添加支持的搜索路径
- (if(null(wcmatch (getenv "ACAD") "*D:\\lisp_ht*"));;文件夹名称用小写
- (progn
- (setq tmp1 (strcat "D:\\lisp_ht" ";"(getenv "ACAD")))
- (setenv "ACAD" tmp1)
- (princ)
- )
- )
- ;;;添加到受信任位置;;CAD版本≥2014;;第一次加载时还是会有提示的
- (cond ( (> (atof (getvar "ACADVER")) 19.0 )
- (if(null(wcmatch (getvar "TrustedPaths") "*D:\\Lisp_HT\\...*"))
- (progn
- (setq tmp2 (strcat "D:\\Lisp_HT\\..." ";"(getvar "TrustedPaths")))
- (command "TrustedPaths" tmp2)
- (princ)
- )
- )
- )
- )
|