소스 검색

Lists: Avoid unnecessary buffer-modified

When fixing bullet types, bullets are now only replaced if they would
change, so if nothing changes, the buffer will remain unmodified.
Carsten Dominik 16 년 전
부모
커밋
fdf8ffc4f1
2개의 변경된 파일2개의 추가작업 그리고 1개의 파일을 삭제
  1. 1 0
      lisp/ChangeLog
  2. 1 1
      lisp/org-list.el

+ 1 - 0
lisp/ChangeLog

@@ -2,6 +2,7 @@
 
 	* org-list.el (org-toggle-checkbox): Make double prefix set the
 	checkbox to "[-]".
+	(org-fix-bullet-type): Only replace bullet it it is changed.
 
 	* org.el (org-add-log-setup): Fix positioning when
 	`org-log-states-order-reversed' is nil.

+ 1 - 1
lisp/org-list.el

@@ -761,7 +761,7 @@ Also, fix the indentation."
 	  (skip-chars-forward " \t")
 	  (looking-at "\\S-+ *")
 	  (setq oldbullet (match-string 0))
-	  (replace-match bullet)
+	  (unless (equal bullet oldbullet) (replace-match bullet))
 	  (org-shift-item-indentation (- (length bullet) (length oldbullet))))))
     (goto-line line)
     (org-move-to-column col)