Fix macro definition of with-silent-modification

* lisp/org-macs.el: Better backup definition for `with-silent-modifications'.
This commit is contained in:
Carsten Dominik 2010-12-03 20:53:34 +01:00
parent 13f066d66d
commit 5d74e1b754
1 changed files with 6 additions and 5 deletions

View File

@ -49,11 +49,12 @@
(with-no-warnings (called-interactively-p ,kind)) ;; defined with no argument in <=23.1
(interactive-p))))
(if (or (< emacs-major-version 23)
(and (<= emacs-major-version 23)
(< emacs-minor-version 2)))
(defmacro with-silent-modifications
(org-unmodified)))
(if (and (not (fboundp 'with-silent-modifications))
(or (< emacs-major-version 23)
(and (= emacs-major-version 23)
(< emacs-minor-version 2))))
(defmacro with-silent-modifications (&rest body)
`(org-unmodified ,@body)))
(defmacro org-bound-and-true-p (var)
"Return the value of symbol VAR if it is bound, else nil."