| 123456789101112131415161718 |
- ;; -*- lexical-binding: t; -*-
- ;; Remove Org remnants built into Emacs
- ;;
- ;; clean load-path
- (setq load-path
- (delq nil (mapcar
- (lambda (p)
- (unless (string-match "lisp\\(/packages\\)?/org$" p)
- p))
- load-path)))
- ;; remove property list to defeat cus-load and remove autoloads
- (mapatoms (lambda (s)
- (let ((sn (symbol-name s)))
- (when (string-match "\\`\\(org\\|ob\\|ox\\)\\(-.*\\)?\\'" sn)
- (setplist s nil)))))
- ;; we should now start from a clean slate
|
