RosettaCodeData/Task/String-append/Emacs-Lisp/string-append-3.el

9 lines
199 B
EmacsLisp
Raw Permalink Normal View History

2026-04-30 12:34:36 -04:00
(let ((buf (get-buffer-create "*foo*")))
(with-current-buffer buf
(insert "foo"))
(with-current-buffer buf
(goto-char (point-max))
(insert "bar")
(buffer-string)))
;; => "foobar"