Find to Edit "acad.pgp" file by Lisp

(
(setq pgp "acad.pgp")
(setq ph (findfile pgp)) ;"C:\\Users\\???\\AppData\\Autodesk\\AutoCAD 2023\\R24.2\\kor\\support\\acad.pgp"
(startapp (strcat "notepad " ph))
(setq ph (vl-string-right-trim pgp ph)) ;"C:\\Users\\???\\AppData\\Autodesk\\AutoCAD 2023\\R24.2\\kor\\support\\"
(startapp (strcat "explorer " "\"" ph))
)

(vl-string-left-trim "a" "aaaaaa aaaaaa aaaaa")
" aaaaaa aaaaa" ; 공백이 나올 때까지 "a" 삭제.