From ff47ecd0282e785c1e4ec72cbabda60977fab2f9 Mon Sep 17 00:00:00 2001 From: Elis Axelsson Date: Sun, 18 Sep 2016 22:18:48 +0200 Subject: [PATCH] Added stub for the function to paste region --- webpaste.el | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/webpaste.el b/webpaste.el index 69669fb..610d53a 100644 --- a/webpaste.el +++ b/webpaste.el @@ -32,6 +32,15 @@ ;;; Code: +;; The function to paste a region +(defun webpaste-paste-region () + "Paste selected region to some paste service." + (interactive) + + (let ((text (buffer-substring (mark) (point)))) + (message text))) + + (provide 'webpaste) ;;; webpaste.el ends here