Allow message overrides in clipboard/{copy,paste}

In case libraries consuming this would like a way to control the message that's
output.
This commit is contained in:
William Carroll 2020-01-16 19:18:11 +00:00
parent 106f62e4f1
commit 7a6ed72bf5

View file

@ -26,15 +26,15 @@
;; Library ;; Library
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defun clipboard/copy (x) (cl-defun clipboard/copy (x &key (message "[clipboard.el] Copied!"))
"Copy string, X, to X11's clipboard." "Copy string, X, to X11's clipboard."
(kill-new x) (kill-new x)
(message "Copied!")) (message message))
(defun clipboard/paste () (cl-defun clipboard/paste (&key (message "[clipboard.el] Pasted!"))
"Paste contents of X11 clipboard." "Paste contents of X11 clipboard."
(yank) (yank)
(message "Pasted!")) (message message))
(exwm-input-set-key (exwm-input-set-key
(kbd "C-M-v") #'ivy-clipmenu/copy) (kbd "C-M-v") #'ivy-clipmenu/copy)