colonelpanic/dotfiles
1
0
Fork 1
Code Issues Pull Requests Packages Projects Releases Wiki Activity

display-prefix

Browse Source
This commit is contained in:
Ivan Malison 2015-09-26 17:46:17 -07:00
parent ffdb76b6ad
commit c262c37177
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -161,6 +161,11 @@
;; functions ;; functions
;; ============================================================================= ;; =============================================================================
(defun display-prefix (arg)
"Display the value of the raw prefix arg."
(interactive "P")
(message "%s" arg))
(defmacro imalison:prefix-alternative (name default alternative) (defmacro imalison:prefix-alternative (name default alternative)
`(defun ,name (arg) (interactive "P") `(defun ,name (arg) (interactive "P")
(if arg (call-interactively (quote ,alternative)) (if arg (call-interactively (quote ,alternative))