--- a/.emacs-my	Thu Oct 06 11:35:21 2011 +0300
+++ b/.emacs-my	Thu Oct 06 17:03:32 2011 +0300
@@ -76,6 +76,14 @@
     x2
     ) )
 
+(unless (fboundp 'ignore-errors)
+  (defmacro ignore-errors (&rest body)
+    "Execute BODY; if an error occurs, return nil.
+Otherwise, return result of last form in BODY."
+    (declare (debug t) (indent 0))
+    `(condition-case nil (progn ,@body) (error nil)))
+  )
+
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (message "mode groups")