emacs：用字符填充对齐的字符串

Question

是否有emacs命令用字符填充对齐的字符串？具体来说，我希望能够

;; Foobar

并获取

;; ===================================Foobar====================================

其中Foobar位于宽度为77的字段中。为清楚起见，我通过python代码";; {:=^77}".format("Foobar")生成了上面的输出。

Answer 1

我不知道有任何现有的功能，但写一个很容易：

(defun center-string-in-char (str len char)
  (store-substring (make-string len char) (/ (- len (length str)) 2) str))

现在(center-string-in-char "Foobar" 77 ?=)会生成您的示例字符串（减去您可以自行添加的前导";; "）。