รีสตาร์ท emacs จากภายใน emacs

ฉันรีสตาร์ท emacs ของฉันมาก สิ่งที่ฉันต้องการทำคือสร้างฟังก์ชั่นที่ฆ่า emacs ปัจจุบันเพียงเพื่อวางไข่ใหม่เท่านั้น เป็นการดีที่จะทำงานใน TTY

หมายเหตุ: ผมห่อต่อไปนี้ในแพคเกจrestart-emacsที่มีอยู่ที่นี่

นี่เป็นอีกทางเลือกหนึ่งในการบรรลุสิ่งที่คุณต้องการโดยใช้อิลิทบริสุทธิ์ (ไม่ใช่จากการพึ่งพาเชลล์) เคล็ดลับคือการวางไข่ในกระบวนการอื่น emacs ก่อนที่ emacs ปัจจุบันจะถูกฆ่า

(defun launch-separate-emacs-in-terminal ()
  (suspend-emacs "fg ; emacs -nw"))

(defun launch-separate-emacs-under-x ()
  (call-process "sh" nil nil nil "-c" "emacs &"))

(defun restart-emacs ()
  (interactive)
  ;; We need the new emacs to be spawned after all kill-emacs-hooks
  ;; have been processed and there is nothing interesting left
  (let ((kill-emacs-hook (append kill-emacs-hook (list (if (display-graphic-p)
                                                           #'launch-separate-emacs-under-x
                                                         #'launch-separate-emacs-in-terminal)))))
    (save-buffers-kill-emacs)))

รหัสในการเริ่ม emacs เวอร์ชัน GUI นั้นเรียบง่าย รหัสที่จะเริ่ม emacs ใน terminal นั้นค่อนข้างยุ่งยาก มันใช้ข้อเท็จจริงที่ว่าคุณสามารถส่งผ่านสตริงsuspend-emacsที่จะถูกส่งผ่านเป็นเทอร์มินัลอินพุตไปยังกระบวนการพาเรนต์ (เชลล์) จากเอกสารประกอบ

(ระงับ emacs และ STUFFSTRING ที่เป็นตัวเลือก)

หยุด Emacs และกลับสู่กระบวนการที่เหนือกว่า คุณสามารถดำเนินการต่อในภายหลัง หาก `ไม่สามารถหยุดชั่วคราว 'ไม่ใช่ศูนย์หรือถ้าระบบไม่รองรับการควบคุมงานให้เรียกใช้ซับเพลลแทน

หาก ARG ตัวเลือกเสริม STUFFSTRING ไม่ใช่ศูนย์ตัวละครของมันจะถูกยัดให้อ่านเป็นอินพุตเทอร์มินัลโดยผู้ปกครองของ Emacs หลังจากระงับ

ดังนั้นโดยทั่วไปเราระงับ emacs ก่อนที่มันจะถูกฆ่าบอกให้ shell แม่กลับมาใช้ emacs ที่ถูกระงับชั่วคราว (ซึ่งกำลังจะออกเร็ว ๆ นี้) แล้วเปิดกระบวนการ emac โปรดทราบว่าสิ่งนี้จะไม่ทำงานบนแพลตฟอร์มที่เทอร์มินัล emacs สามารถ / ไม่หยุดชั่วคราว แต่เริ่มการทำงานของเชลล์ย่อยเช่นบน windows

เท่าที่ฉันรู้ว่าคุณไม่สามารถบอกให้ Emac เริ่มต้นใหม่ได้หลังจากสิ้นสุด แต่คุณสามารถตั้งรหัสทางออกเพื่อให้กระบวนการที่เริ่ม Emacs ในตอนแรกสามารถตรวจพบว่าคุณต้องการเริ่มต้นใหม่

ตัวอย่างเช่นเชลล์สคริปต์นี้เริ่มต้น Emacs ใหม่หากออกจากด้วยรหัส 123

#!/bin/sh
while emacs -nw "$@"; [ $? = 123 ]; do :; done

ถัดไปเรากำหนดkill-emacs-and-restartว่าทำให้ Emacs ยุติด้วยรหัสทางออกเท่ากับจำนวนเวทย์ที่สคริปต์รับรู้:

(defun kill-emacs-and-restart ()
  (interactive)
  (kill-emacs 123))

ตอนนี้ถ้าคุณเรียกใช้ Emacs ผ่านสคริปต์นี้คุณสามารถเริ่มต้นใหม่ด้วยM-x kill-emacs-and-restart(หรือผูกไว้กับลำดับของคีย์)

ขโมยโจ๋งครึ่มจากhttps://unix.stackexchange.com/questions/114238/is-it-possibe-to-change-parent-shells-working-directory-programmatically

สมมติว่าฉันมีไวยากรณ์ที่ถูกต้องสำหรับการฝัง "ในสตริงสิ่งนี้ควรทำ

(defun restart-emacs ()
  (call-process "sh" nil nil nil "-c" "gdb -p $(ps h -o ppid -p $$) -ex 'call execl(\"/bin/sh\", \"/bin/sh\", \"-c\", \"exec emacs\")'"))