| 
					
				 | 
			
			
				@@ -2708,7 +2708,7 @@ nearest into the future." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 (defcustom org-deadline-warning-days 14 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   "No. of days before expiration during which a deadline becomes active. 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 This variable governs the display in sparse trees and in the agenda. 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-When negative, it means use this number (the absolute value of it) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+When negative or null, it means use the absolute value of this number 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 even if a deadline has a different individual lead time specified." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   :group 'org-time 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   :group 'org-agenda-daily/weekly 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -18600,12 +18600,11 @@ belonging to the category \"Work\"." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   (require 'calendar) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   (require 'appt) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   (setq appt-time-msg-list nil) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  (appt-check t) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  (save-window-excursion (appt-check t)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   (if (equal filter '(4)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				       (setq filter (read-from-minibuffer "Regexp filter: "))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   (let* ((cnt 0) ; count added events 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	 (org-agenda-new-buffers nil) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-	 (org-deadline-warning-days 0) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	 (today (org-date-to-gregorian 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 		 (time-to-days (current-time)))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	 (files (org-agenda-files)) entries file) 
			 |