Bir alt süreci “ayırmak” mümkün mü?

Kullandığım browse-url/ browse-url-firefoxözünde yürütür Linux altında Emacs 24.5.1 (Fedora 23) içinden Firefox'ta açık bağlantıları firefoxile URL ile yürütülebilir start-process. Halihazırda çalışan bir Firefox örneği varsa, bu da URL'nin yeni bir sekmede açılmasına ve firefoxEmacs'tan kaynaklanan yürütülebilir dosyayı sonlandırmasına neden olur , ancak aksi takdirde Emacs'ın işlem alt öğesi olarak yeni bir Firefox örneği çalışır (test amacıyla) , bu eşdeğerdir M-! sleep 1h & RET).

O zaman Emacs'tan çıkmak istiyorsam bana "Aktif süreçler var; onları öldür ve yine de çıkılsın mı?" Diye sorar. Firefox örneğini öldürme veya Emacs'ı çalışır durumda bırakma seçeneğiyle. Bunun yerine firefox, Firefox örneğini çalışır durumda tutarken Emacs'tan çıkabilmem için işlemi Emacs üst öğesinden "ayırmak" istiyorum .

Emacs'tan "hayatta" kalan süreçleri Emacs'tan çıkarmak mümkün mü, yoksa Emacs çıktığında tüm ortaya çıkan süreçler ölmeli mi?

İşte çözüm, @ abo-abo'nin cevabını kısaltmak.

(cond
     ((string-equal system-type "windows-nt") ; Windows
      // ...
      )
     ((string-equal system-type "gnu/linux")
      (start-process "my-browse"
                     nil "setsid"
                     "firefox"
                     (concat "file://" buffer-file-name ))

      ;; (browse-url ξurl)
      )
     ((string-equal system-type "darwin") ; Mac
                // ...
                ))

Mac'in set kimliği olmadığından koşulun gerekli olduğunu unutmayın.

İşte istediğinizi yapan bir komut:

(defun ora-dired-start-process (cmd &optional file-list)
  (interactive
   (let ((files (dired-get-marked-files
                 t current-prefix-arg)))
     (list
      (unless (eq system-type 'windows-nt)
        (dired-read-shell-command "& on %s: "
                                  current-prefix-arg files))
      files)))
  (if (eq system-type 'windows-nt)
      (dolist (file file-list)
        (w32-shell-execute "open" (expand-file-name file)))
    (let (list-switch)
      (start-process
       cmd nil shell-file-name
       shell-command-switch
       (format
        "nohup 1>/dev/null 2>/dev/null %s \"%s\""
        (if (and (> (length file-list) 1)
                 (setq list-switch
                       (cadr (assoc cmd ora-dired-filelist-cmd))))
            (format "%s %s" cmd list-switch)
          cmd)
        (mapconcat #'expand-file-name file-list "\" \""))))))

(define-key dired-mode-map "r" 'ora-dired-start-process)

Buradaki anahtar şey kullanmaktır nohup.

Buradaki kaynağa bakın .