From 7c56be89ce21c3ba8d8633478728df487e469932 Mon Sep 17 00:00:00 2001 From: 8dcc <8dcc.git@gmail.com> Date: Mon, 25 Nov 2024 14:06:15 +0100 Subject: [PATCH] Remove arguments from 'webpaste-paste-buffer-or-region' Since (interactive "r") fails when starting Emacs (or creating new buffers, perhaps?) with the following error message: execute-extended-command: The mark is not set now, so there is no region Since this commit changes the function arguments, it might break some existing calls from Elisp, and this might not be worth it. --- webpaste.el | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/webpaste.el b/webpaste.el index fdf0b2d..59db9f0 100644 --- a/webpaste.el +++ b/webpaste.el @@ -618,15 +618,14 @@ Argument MARK Current mark." ;;;###autoload -(cl-defun webpaste-paste-buffer-or-region (&optional point mark) - "Paste current buffer or selected region to some paste service. -Takes optional POINT and MARK to paste a region." - (interactive "r") +(cl-defun webpaste-paste-buffer-or-region () + "Paste current buffer or selected region to some paste service." + (interactive) ;; if region is selected (if (region-active-p) ;; Paste selected region - (webpaste-paste-region point mark) + (webpaste-paste-region (region-beginning) (region-end)) ;; Else, Paste buffer (webpaste-paste-buffer)))