Spacing between blocks

master
Elis Axelsson 10 years ago
parent 1c2a9b8588
commit 6d2e063856
  1. 3
      webpaste.el

@ -184,6 +184,7 @@ When we run out of providers to try, it will restart since
(let ((text (buffer-substring (mark) (point))))
(webpaste-paste-text text)))
;;;###autoload
(defmacro webpaste-save-mark-and-excursion (&rest body)
"Wraps usage of sending BODY to ‘save-mark-and-excursion’ / ‘save-excursion’."
@ -191,6 +192,7 @@ When we run out of providers to try, it will restart since
`(save-excursion ,@body)
`(save-mark-and-excursion ,@body)))
;;;###autoload
(defun webpaste-paste-buffer ()
"Paste current buffer to some paste service."
@ -201,6 +203,7 @@ When we run out of providers to try, it will restart since
(goto-char (point-max)) ; Go to point-max
(webpaste-paste-region))) ; Paste region
(provide 'webpaste)
;;; webpaste.el ends here

Loading…
Cancel
Save