wgester/dotfiles
1
0
Fork 0
forked from colonelpanic/dotfiles
Code Pull Requests Activity

supress-messages macro

Browse Source
This commit is contained in:
Ivan Malison 2015-01-30 21:48:17 -08:00
parent 134872ec90
commit 995dda48d5
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
dotfiles/emacs.d/init.el
View File

@ -142,6 +142,10 @@
;; functions ;; functions
;; ============================================================================= ;; =============================================================================
(defmacro suppress-messages (&rest forms)
`(flet ((message (&rest r) nil))
,@forms))
(defun cmp-int-list (a b) (defun cmp-int-list (a b)
(when (and a b) (when (and a b)
(cond ((> (car a) (car b)) 1) (cond ((> (car a) (car b)) 1)