From db4f6a847f1dc975ef7cd2a39cdfcb817d9c049a Mon Sep 17 00:00:00 2001 From: tfheen Date: Tue, 28 Jun 2005 18:37:48 +0000 Subject: [PATCH] handle newer emacs too git-svn-id: file:///svn/tfheen/trunk/dotfiles@791 8da78d58-1cd3-0310-bee5-d77bd1b3e8bf --- emacs-standard | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/emacs-standard b/emacs-standard index 16bd54b..ccacc3d 100644 --- a/emacs-standard +++ b/emacs-standard @@ -8,10 +8,20 @@ ,@body)) (defmacro cw/for-emacs-21 (&rest body) + `(when (and (= emacs-major-version 21) + (not (string-match "Lucid" emacs-version))) + ,@body)) + +(defmacro cw/for-emacs-21-and-later (&rest body) `(when (and (>= emacs-major-version 21) (not (string-match "Lucid" emacs-version))) ,@body)) +(defmacro cw/for-emacs-22 (&rest body) + `(when (and (= emacs-major-version 22) + (not (string-match "Lucid" emacs-version))) + ,@body)) + (defmacro cw/for-emacs (&rest body) `(when (not (string-match "Lucid" emacs-version)) ,@body)) -- 2.39.5