Decline sender offer from mu4e using chatgpt-shell

mu4e-reply-to-spammer.el

(defun ar/chatgpt-decline-offer-from-sender ()
  (interactive)
  (unless (eq major-mode 'mu4e-compose-mode)
    (user-error "Not in mu4e:compose mode"))
  (let ((chatgpt-shell-prompt-query-response-style 'inline))
    (chatgpt-shell-send-to-buffer
     (concat "write a succinct email reply body and kindly decline explictly to the following email as I am not interested: \n\n"
             (buffer-substring-no-properties (point-min) (point-max))))))