소스 검색

Bug fix, to remove nil face in face list.

Patch from Wanrong Lin.
Carsten Dominik 17 년 전
부모
커밋
13d84d1bdb
2개의 변경된 파일3개의 추가작업 그리고 2개의 파일을 삭제
  1. 1 0
      ChangeLog
  2. 2 2
      org.el

+ 1 - 0
ChangeLog

@@ -12,6 +12,7 @@
 	special case wdays=0.
 	(org-agenda-get-deadlines): Pass wdays to
 	`org-agenda-deadline-face'.
+	(org-agenda-align-tags): Bug fix.
 
 2008-02-28  Bastien Guerry  <bzg@altern.org>
 

+ 2 - 2
org.el

@@ -23059,8 +23059,8 @@ the new TODO state."
 				(if line (point-at-eol) nil) t)
 	(add-text-properties
 	 (match-beginning 2) (match-end 2)
-	 (list 'face (list 'org-tag (get-text-property
-				     (match-beginning 2) 'face))))
+	 (list 'face (delq nil (list 'org-tag (get-text-property
+					       (match-beginning 2) 'face)))))
 	(setq l (- (match-end 2) (match-beginning 2))
 	      c (if (< org-agenda-tags-column 0)
 		    (- (abs org-agenda-tags-column) l)