emacs - 在 emacs 中加密区域

Question

我一直在尝试编写一个小函数来加密 emacs 中的文件内容。以下是我遵循的步骤：

• 全选 ( C-x h)
• M-x epa-encrypt-region RET
• C-c C-c

完成这些步骤后，emacs 将提示输入密码，文件将被加密。这是我写的函数：

(defun encrypt ()
  "encrypt file"
  (interactive)
  (command-execute (kbd "C-x h M-x epa-encrypt-region RET C-c C-c"))
  )

(global-set-key (kbd "C-c C-e") 'encrypt)

但它似乎有什么问题。请帮我解决这个问题。

Answer 1

使用函数epa-encrypt-file而不是编写它。

Answer 2

我很想知道您在哪里找到要使用的建议command-execute以及kbd以这种方式使用。这似乎是一件普遍有效的事情，但它显然不是这里最明智的选择（而且很少会如此）。我想这实际上是我第一次看到它。

简而言之，如果没有必要，不要试图伪造交互调用函数的过程。

(epa-encrypt-region (point-min) (point-max) nil nil nil)