将当前行移动到Emacs中当前缓冲区的标头

我正试图找到一种方法来自动化/简化以下用例：

我在一个长文件的中间，我粘贴了一些东西。

然后我想发送/移动当前行（到当前打开文件的顶部标题）。通常这是一些导入/要求功能

理想情况下，所有这些操作都应该在不丢失文件中的相对位置的情况下进行（无需手动设置标记）

我该怎么做

---

如果这很重要，我主要在邪恶模式下使用Emacs。

以下是代码：

（将区域移动到缓冲区的开头（beg end）
将区域移到缓冲区的开头，然后返回
（交互式“r”）
（let（（文本（缓冲区子字符串beg end）））
（省去远足
（结束时删除区域）
（转到字符（最小点））
（插入正文）

通过选择要发送到缓冲区开头的文本（实际上，在粘贴之后，它已经被标记）来使用它，然后M-x将区域移动到缓冲区开头RET。 您也可以用通常的方式将此命令绑定到键。

以下是代码：

（将区域移动到缓冲区的开头（beg end）
将区域移到缓冲区的开头，然后返回
（交互式“r”）
（let（（文本（缓冲区子字符串beg end）））
（省去远足
（结束时删除区域）
（转到字符（最小点））
（插入正文）

通过选择要发送到缓冲区开头的文本（实际上，在粘贴之后，它已经被标记）来使用它，然后M-x将区域移动到缓冲区开头RET。

---

您也可以用通常的方式将此命令绑定到键。

区域选择方法可能更好。谢谢大家!@NikitaFedyashev:wdym？对不起，我的意思是显式区域选择，而不仅仅是当前的lineRegion选择方法可能更好。谢谢大家!@NikitaFedyashev:wdym？对不起，我的意思是一个明确的区域选择，而不仅仅是当前行