Replace `delete-line` with its definition

37c022ae ("Use `without-restriction` in `with-temporary-notmuch-message-buffer`", 2024-03-14)
introduced `delete-line` in a test, but this is Emacs 29 and above only.
Replace it with its (almost) definition.

diff --git a/test/T630-emacs-draft.sh b/test/T630-emacs-draft.sh
index 1fad58a813bd3a151f3a617397d64c46358aec63..7d0da21a18bc0babde0107cfa05113f46929c209 100755 (executable)
--- a/test/T630-emacs-draft.sh
+++ b/test/T630-emacs-draft.sh
@@ -76,7 +76,7 @@ add_email_corpus attachment
 test_begin_subtest "Saving a draft keeps hidden headers"
 test_emacs '(notmuch-mua-new-reply "id:874llc2bkp.fsf@curie.anarc.at")
             (message-goto-subject)
 test_begin_subtest "Saving a draft keeps hidden headers"
 test_emacs '(notmuch-mua-new-reply "id:874llc2bkp.fsf@curie.anarc.at")
             (message-goto-subject)

-            (delete-line)
+            (delete-region (line-beginning-position) (line-beginning-position 2))

             (insert "Subject: draft-test-reply\n")
            (test-output "DRAFT")
            (notmuch-draft-postpone)
             (insert "Subject: draft-test-reply\n")
            (test-output "DRAFT")
            (notmuch-draft-postpone)