X-Git-Url: https://git.siccegge.de//index.cgi?p=dotfiles%2Femacs.git;a=blobdiff_plain;f=config%2Fpastebin.el;fp=config%2Fpastebin.el;h=ced33c5136506e7282e7d9ea0b72e9d0124370a1;hp=0000000000000000000000000000000000000000;hb=27c85285f89b94bef7ba54c9b11da587941a6a7c;hpb=b946eff46036e6d5b5e1c63925e543b922b71a83

diff --git a/config/pastebin.el b/config/pastebin.el
new file mode 100644
index 0000000..ced33c5
--- /dev/null
+++ b/config/pastebin.el
@@ -0,0 +1,12 @@
+(message "Bringing up pastebin support")
+
+(if (locate-library "pastebin")
+	(require 'pastebin)
+  (message "[W] No pastebin stuff available"))
+
+(if (locate-library "identica-mode")
+	(defun snippet-publish ()
+	  "Takes the actual region, pastes it on paste.q0a.de an asks you for a identi.ca message"
+	  (interactive)
+	  (identica-update-status-from-minibuffer
+	   (pastebin (region-beginning) (region-end) "f"))))
\ No newline at end of file