找到自己想要的函数了 customize-push-and-save 可以将所需的代码加入 custom.el ：
(add-to-list 'local-variable-list `(eval . (setq org-media-note-screenshot-image-dir (concat default-directory ,(format "%s" relative-img-dir)))))
(customize-push-and-save 'safe-local-variable-values local-variable-list)
谢谢你的建议，我看了你的代码也才发现自己原来的写错了。