| 
					
				 | 
			
			
				@@ -73,6 +73,8 @@ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 			     compress-algorithm)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 (declare-function epg-encrypt-string "epg" 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 		  (context plain recipients &optional sign always-trust)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+(defvar epg-context) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 (defgroup org-crypt nil 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   "Org Crypt." 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -161,7 +163,7 @@ See `org-crypt-disable-auto-save'." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   (if (and (string= crypt-key (get-text-property 0 'org-crypt-key str)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	   (string= (sha1 str) (get-text-property 0 'org-crypt-checksum str))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				       (get-text-property 0 'org-crypt-text str) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-      (set (make-local-variable 'epg-context) (epg-make-context nil t t)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    (set (make-local-variable 'epg-context) (epg-make-context nil t t)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				     (epg-encrypt-string epg-context str (epg-list-keys epg-context crypt-key)))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 (defun org-encrypt-entry () 
			 |