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 ?=) 生成您的示例字符串(减去您可以自己添加的前导 ";; " )。