Add cw/for-emacs-22-and-later macro

git-svn-id: file:///svn/tfheen/trunk/dotfiles@1233 8da78d58-1cd3-0310-bee5-d77bd1b3e8bf

diff --git a/emacs-standard b/emacs-standard
index ccacc3d2ba323b1215c16a7b5e77d0018d8a11ec..cccb704c64857116c8f082a7d3f6f8ef078e1b14 100644 (file)
--- a/emacs-standard
+++ b/emacs-standard
@@ -22,6 +22,11 @@
               (not (string-match "Lucid" emacs-version)))
      ,@body))
 
+(defmacro cw/for-emacs-22-and-later (&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))