diff options
author | Carsten Dominik <carsten.dominik@gmail.com> | 2010-12-03 20:53:34 +0100 |
---|---|---|
committer | Carsten Dominik <carsten.dominik@gmail.com> | 2010-12-03 20:53:34 +0100 |
commit | 5d74e1b754861d3429ee5332557321f24d4abd00 (patch) | |
tree | 590ac3026b8dfcd6d6d5af8c36614665d11ff4ae | |
parent | 13f066d66da2c553fe2cbf871f2abb0abdf58570 (diff) | |
download | org-mode-5d74e1b754861d3429ee5332557321f24d4abd00.tar.gz |
Fix macro definition of with-silent-modification
* lisp/org-macs.el: Better backup definition for `with-silent-modifications'.
-rw-r--r-- | lisp/org-macs.el | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/lisp/org-macs.el b/lisp/org-macs.el index 5ea2d43..529a6be 100644 --- a/lisp/org-macs.el +++ b/lisp/org-macs.el @@ -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." |