aboutsummaryrefslogtreecommitdiffstats
path: root/testing/org-batch-test-init.el
blob: bd11ea61c29481b2e7b00c42eb63d47d61bffff8 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
;;  -*- 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