Функция создания/переключения буфера Emacs

Question

Я хотел бы создать функцию, которая создает буфер с именем «console», если он не существует и выполняет несколько команд. Если буфер уже существует, я хочу, чтобы он только переключился на него.

Answer 1

Попробуйте это, очевидно, заменив (insert "something\n") с командами, которые вы хотите запустить:

(defun jump-to-console() 
    "go to console buffer if it exists, otherwise create" 
    (interactive) 
    (let ((buffer-name "console")) 
    (if (get-buffer buffer-name) 
     (pop-to-buffer buffer-name) 
     (pop-to-buffer (get-buffer-create buffer-name)) 
     (insert "something\n")))) 

Answer 2

get-buffer-create («Вернуть буфер, указанный BUFFER-OR-NAME, создавая новый, если необходимо».) Будет обрабатывать создание буфера, если он не существует. Затем используйте switch-to-buffer («Сделать BUFFER-OR-NAME текущим и отобразить его в выбранном окне.»), Чтобы переключиться на буфер.

Так что-то, как это будет делать трюк:

(switch-to-buffer (get-buffer-create "console"))