[nongnu] elpa/webpaste ff47ecd 004/298: Added stub for the function to paste region

[ELPA Syncer]

branch: elpa/webpaste
commit ff47ecd0282e785c1e4ec72cbabda60977fab2f9
Author: Elis Axelsson <elis.axelsson@gmail.com>
Commit: Elis Axelsson <elis.axelsson@gmail.com>

    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