瀏覽代碼

Merge branch 'maint'

Bastien Guerry 11 年之前
父節點
當前提交
abd8e52dc0
共有 1 個文件被更改,包括 2 次插入3 次删除
  1. 2 3
      lisp/org.el

+ 2 - 3
lisp/org.el

@@ -9258,10 +9258,9 @@ definitions."
 			  (string-match (cdr rr) (symbol-name major-mode)))
 		     (and (eq (car rr) 'in-buffer)
 			  (string-match (cdr rr) (buffer-name)))
-		     (if (and (eq (car rr) 'not-in-file)
+		     (when (and (eq (car rr) 'not-in-file)
 				(buffer-file-name))
-			 (not (string-match (cdr rr) (buffer-file-name)))
-		       t)
+		       (not (string-match (cdr rr) (buffer-file-name))))
 		     (when (eq (car rr) 'not-in-mode)
 		       (not (string-match (cdr rr) (symbol-name major-mode))))
 		     (when (eq (car rr) 'not-in-buffer)