| 
					
				 | 
			
			
				@@ -29,12 +29,18 @@ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 (require 'org-compat) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 (require 'org-id) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+(require 'xdg) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 (declare-function org-back-to-heading "org" (&optional invisible-ok)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 (declare-function org-next-visible-heading "org" (arg)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 (declare-function org-at-heading-p "org" (&optional invisible-not-ok)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-(defvar org-persist-path (org-file-name-concat user-emacs-directory "org-persist/") 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+(defvar org-persist-path (org-file-name-concat 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+               (let ((cache-dir (xdg-cache-home))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+                 (if (seq-empty-p cache-dir) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+                     user-emacs-directory 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+                   cache-dir)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+               "org-persist/") 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   "Directory where the data is stored.") 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 (defvar org-persist-index-file "index" 
			 |