浏览代码

XEmacs: Default `org-self-insert-cluster-for-undo' also on XEmacs.

2012-08-25  Michael Sperber  <mike@xemacs.org>

	* org.el (org-self-insert-cluster-for-undo): Default
	`org-self-insert-cluster-for-undo' also on XEmacs.
Mike Sperber 13 年之前
父节点
当前提交
501db42c8c
共有 1 个文件被更改,包括 2 次插入1 次删除
  1. 2 1
      lisp/org.el

+ 2 - 1
lisp/org.el

@@ -1281,7 +1281,8 @@ See also the variable `org-table-auto-blank-field'."
 	  (const :tag "on" t)
 	  (const :tag "on" t)
 	  (const :tag "on, optimized" optimized)))
 	  (const :tag "on, optimized" optimized)))
 
 
-(defcustom org-self-insert-cluster-for-undo (version<= emacs-version "24.1")
+(defcustom org-self-insert-cluster-for-undo (or (featurep 'xemacs)
+						(version<= emacs-version "24.1"))
   "Non-nil means cluster self-insert commands for undo when possible.
   "Non-nil means cluster self-insert commands for undo when possible.
 If this is set, then, like in the Emacs command loop, 20 consecutive
 If this is set, then, like in the Emacs command loop, 20 consecutive
 characters will be undone together.
 characters will be undone together.