X-Git-Url: https://git.distorted.org.uk/~mdw/profile/blobdiff_plain/1e7a9479476de03b7d9e5a31099716999bc3c239..9e789ed540fb8ce154b581971b80d7ab307a061d:/el/dot-emacs.el

diff --git a/el/dot-emacs.el b/el/dot-emacs.el
index b7a1cc2..248ce17 100644
--- a/el/dot-emacs.el
+++ b/el/dot-emacs.el
@@ -48,6 +48,8 @@ This may be at the expense of cool features.")
 
 (defmacro mdw-regexps (&rest list)
   "Turn a LIST of strings into a single regular expression at compile-time."
+  (declare (indent nil)
+	   (debug 0))
   `',(make-regexp list))
 
 ;; Some error trapping.
@@ -57,6 +59,8 @@ This may be at the expense of cool features.")
 
 (defmacro trap (&rest forms)
   "Execute FORMS without allowing errors to propagate outside."
+  (declare (indent 0)
+	   (debug t))
   `(condition-case err
        ,(if (cdr forms) (cons 'progn forms) (car forms))
      (error (message "Error (trapped): %s in %s"