org-mode-mirror/testing/org-batch-test-init.el

;;  -*- 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