| 
					
				 | 
			
			
				@@ -1043,7 +1043,8 @@ key." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				     ((guard (not (lookup-key calendar-mode-map "c"))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				      (local-set-key "c" #'org-calendar-goto-agenda)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				     (_ nil)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  (unless (eq org-agenda-diary-file 'diary-file) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  (unless (and (boundp 'org-agenda-diary-file) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+	       (eq org-agenda-diary-file 'diary-file)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				     (local-set-key org-calendar-insert-diary-entry-key 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 		   #'org-agenda-diary-entry))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 |